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Only Microware's OS-9 

Operating System Covers 

the Entire 68000 Spectrum 



MICROWARE'S OS-9 




ROM-BASED 
CONTROL 
SYSTEMS 



flDPfY-OISK BASED 

PERSONAL 

COMPUTERS 



DISK-BASED 

INDUSTRIAL 

SYSTEMS 



SMALL SCALE 

TIMESHARING 

SYSTEMS 



LARGE-SCALE 

TIMESHARING 

SYSTEMS 



HANDHELD 
COMPUTERS 



HARDWARE. SOFTWARE 
DEVELOPMENT SYSTEMS 



SINGLE USER 
MULTITASKING SYSTEMS 



MEDIUM-SCALE 
TIMESHARING SYSTEMS 



SMALL SYSTEMS 



URGE SYSTEMS 



Is complicated software and expensive hardware 
keeping you back from Unix? Look Into OS 9, the 
operating system from Microwan? that gives 68000 systems 
a Unix-style environment with much less overhead and 
complexity. 

OS-9 is versatile, inexpensive, and delivers outstanding 
performance on any size system. The OS-9 executive is 
much smaller and far more ef- 
ficient than Unix because it's 
written in fast, compact as- 
sembly language, making it 
ideal for critical teal time ap- 
plications. OS-9 can run on 
a broad range of 8 to 32 bit 
systems based on the 68000 
or 6809 family MPUs from 
ROM-based industrial con- 
trollers up to large multiuser 
systems. 

OS-9S OUTSTANDING 

C COMPILER IS 
YOUR BRIDGE TO UNIX 



Key OS-9 Features At A Glance 

Compact U6K) ROMahle executive written in assembly 

language 

User "shell" and complete utility set written in C 

C-source code level compatibility with Unix 

Full Multitasking/multiuser capabilities 

Modular design - extiemely easy to adapt, modify, or 

expand 

Unix-type tree structured file system 

Rugged "crash proof file structuie with record locking 

Works well with floppy disk or ROM based systems 

Uses hardware or softwaie memory management 

Higb performance C, Pascal. Basic and Cobol compilers 



rVficroware's C compiler tech- 
nology is another OS-9 advantage. The compiler produces 
extremely fast, compact, and ROMable code. You can easily 
develop and port system or application software back and 
forth to standard Unix systems. Cross-compiler versions for 



VAX and PDP-11 make coordinated Unix/OS-9 software 
development a pleasure. 

SUPPORT FOR MODULAR SOFTWARE 
- AN OS-9 EXCLUSIVE 

Comprehensive support for modular software puts OS-9 
a generation ahead of other operating systems. It multiplies 
programmer pioductivity and memory efficiency. Applica- 
tion softwaie can be built 
from individually testable 
software modules including 
standaal "library" modules. 
The modular structure lets 
you customize and recon- 
figure OS-9 for specific hard- 
ware easily and quickly. 

A SYSTEM WITH 

A PROVEN 
TRACK RECORD 

Once an underground 
classic, OS-9 is now a solid 
hit. Since 1980 OS-9 has 
been ported to over a hun- 
dred 6809 and 68000 

systems under license to some of the biggest names in the 

business. OS-9 has been imbedded in numerous consumer. 

industrial, and OEM products, and is supported by many 

independent software suppliers. 



AUSTRALIA 

MICROfROC«SOR 
CONSUOAN1S 
16 Bandera Avenue 
Wag** Wagwi 26S0 
NSW Australia 
phone: 6!»-»>l 23.(1 

ENGLAND 

VTVAWAV LTD. 
36-38 John Street 
Luton, BeJfordshlcv 
England till zJE 
phone: (OSM) 42342S 
letex- S25I15 



-~7*uetottmc— OS-9 



AUTHORIZED MICRO WARE DISTRIBUTOR 



SWEDEN 
MICKOM ASTER 
SCANDINAVIAN AB 
5:1 rVngaran 7 
Eo» IXio 
S75I-43 UppsaiU 
5wcden 
phone: 0I«-IJ*S9S 
trie*- 76129 
OS-9 Is a trademark M Mirroware and Motorola. Unix is a trademark of Bell Labs 



JAPAN 

MICROWARE IAPAN LTD 
.!-#9 flarall. Ichikawa 
Ch&j 272-01. Japan 
phone: 047} 12*) 4401 
lefcx: 7»l-299-J(22 



S TZERLAND 

tTSOFT AG 

Bankstra&c 9 

5432 Neucnhof 

Switaerland 

phone-. 141) 056-R62724 

lelei 57138 



USA 

MrCKOWARE SYSTEMS 

OWORAllON 
libit NW l!4lh Stnrd 
Dr> Moines. Iowa 50322 
USA 

[>honr 515-224 1929 
felt* 910.520-2535 
FAX 5152241352 

WIST GERMANY 

DR KEIL CMBH 
ftwphyMravte '5 
D-nW Svhrteshvlm 
W«l Germany 
phone: 10 *2 03)67 4t 
telex 05025 



GmX 68020 DEVELOPMENT SYSTEM 

A Multi-user, Multi-tasking software development system tor use with all 68000 family processors. 




HARDWARE FEATURES 



• The GMX-020 CPU board has: the MC68020 32-bit processor, a 4K 
Byte no wait-state instruction cache, high-speed MMU, and a lull- 
featured hardware time of day clock /calendar with battery back- 
up. It also provides for an optional 68881 floating point co- 
processor. 

• 1 Megabyte of high speed static RAM. 

• Intelligent Serial and Parallel 1/0 Processor boards significantly 
reduce system overhead by handling routine I/O functions. This 
Irees up the host CPU for running user programs. The result is a 
speed up of system performance and allows all terminals to run at 
up to 19.2K baud. 

■ The system hardware will support up to 39 terminals. 

• Powered by a constant voltage ferro- resonant power supply that in- 
sures proper system operation under adverse AC power input condi- 
tions. 

• OMA hard disk interface and DMA double density floppy disk con- 
troller are used for data transfers at full bus speed. The DMA hard 
disk drive controller provides automatic 22- bit burst data error 
detection and 11 -bit burst error correction. 

» A selection of hard disk drives with capacities from 19 to 85 
Megabytes, removeable pack hard disk drives, streaming tape 
drives, and (loppy disk drives is available. 

Will a i kaomrt a a I & 1 

Wm tt»»«u>k oHklS GewfrmM 

UofUX is t »adanwk Of IkMuI SyHtim COnxAjnts ioc 

GHX «no tiMi> *t itxwmiriu of OiMK Ik 



SOFTWARE FEATURES: 

The UniFLEX VM Operating System is a demand-paged, virtual 
memory operating system written in 68020 Assembler code for com- 
pactness and efficiency. Any UniFLEX system will run faster than a 
comparable system written in a higher level language. This is impor- 
tant in such areas as context switching, disk 1/0, and system call 
handling. Other features include: 

• compact, efficient Kernel and modules allows handling more users 
more effectively than UNIX systems, using much less disk space. 

UNIX system V compatibility at the C source code level. 

C Compiler optimized in 68020 code (optional). 

Record locking for shared files. 

Users can share programs in memory. 

Modeled after UNIX systems, with similar commands. 

System accounting facilities. 

Sequential and random file access. 

Maximum record size limited only by the disk size. 

Multiple Level Directories. 

Up to 4 Megabytes of Virtual Memory per user. 

Optional Languages available are: C. BASIC. COBOL, FORTRAN. 
LISP. PROLOG. SCULPTOR, and ASSEMBLER. In development are 
ADA, PASCAL, and FORTH. 

Included with the UniFLEX Operating System are a Utilities package, 
editor, relocating assembler, linking loader, and printer spooler. Op- 
tions inlcude a fast floating point package, library generator, and a 
sort- merge package. 

The GMX version of the MOTOROLA 020 BUG is included with the 
system. 



GIMIX. Inc.. a Chicago based microcomputer company established in 1975, has produced slate of the ait microcomputer systems based on Motorola 6800 and 
6809 microprocessors. GIMIX systems are in use in Industry,, Hospitals, Universtlies, Research Organiations, and by Software Developers. GIMIX was awarded 
the prestigious President's "E" Certificate for Exports in 1984. 



Gimix 



1337 WEST 37th PLACE 



CHICAGO, ILLINOIS 60609 



(312)927-5510 



TWX910-221-4055 
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Super Mainframe - 0S9 • FLEX • Assorted Hardware 
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Send All Correspondence To: 

Computer Publishing Center 

68' Micro Journal 

5900 Cassandra Smith Rd. 

Hlxson, TN 37343 

Phone (615) 842-4600 or Telex 5 1 06006630 

Copyrighted 1985 by Computer Publishing Inc. 

68' Micro Journal is published 12 times a year by Computer 
Publishing Inc. Second Class Postage Paid ISSN 0194-5025 at 
Hixson. TN and additional entries. Postmaster: send form 3597 to 
68' Micro Journal, POB 849 Hixson. TN 37343. 

Subscription Rates 

1 Year $24.50 U.S.A., Canada & Mexico Add $9.50 a Year. Other 
Foreign Add $12 a Year for Surface, Airmail Add $48 a Year. 
Must be in U.S. currency!! 

Items or Articles For Publication 

Articles submitted tor publication should include authors name, 
address, telephone number and date. Articles should be on 
either 5 or 8 Inch disk in STYLOGRAPH or TSC Editor format 
with 3.5 Inch column width. All disks will be returned. Articles 
submitted on paper should be 4.5 Inches In width (Including 
Source Listings) for proper reductions. Please Use A Oark Rib- 
bon!! No Blue Ink!)! Single space on 8x1 1 bond or betler grade 
paper. No hand written articles accepted. Disks should be in 
FLEX2 6800 or FLEX9 6809 any version or OS-9 any version. 

The following TSC Text Processor commands ONLY should 
be used: .sp space, ,pp paragraph. .(I fill and .nf no fill. Also 
please do not format within the text with multiple spaces. We 
will enter the rest at time of editing. 

All STYLOGRAPH commands are acceptable except ,pg page 
command. We print edited text files in continous text form. 

Letters To The Editor 

All letters to the editor should comply with the above require- 
ments and must be signed. Letters of "gripes" as well as 
"praise" are solicited. We reserve the right to reject any submis- 
sion for lack of "good taste" and we reserve the night to define 
"good taste". 

Advertising Rates 

Commercial advertisers please contact 68' Micro Journal adver- 
tising department for current rate sheet and requirements. 

Ctessrfled Advertising 

All classified ads must be non-commercial. Minimum of $9,50 for 
first 20 words and .45 per word after 20. All classifieds must be 
paid In advance. No classified ads accepted over the phone. 
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OS-9" 
User Notes 



By: Peter Dibble 

The publishers of 68' Micro Journal sre proud Co 
available the publication of Peter Dibbles 
059 USEt BOTES 

Information for the IICDHIR to the PRO, 
tegular or CoCo 0S9 



Using 0S9 

HELP, MINTS, PROBLEMS, REVIEWS, SUGGESTIONS, COMPLAINTS, 

0S9 STANDARDS, Generating a New Bootstrap, Building a 

new System Disk, 0S9 Users Group, etc. 

Prograa interfacing to 0S9 
DEVICE DESCRIPTORS, DIRECTORIES, "FORKS", PROTECTION, 
■SUSPEND STATE - , "PIPES", 'INPUT/OUTPtT SYSTEM", etc. 

Programming languages 

Assembly Language Programs snd Interfacing; Baslc09, C, 

Pascsl, snd Cobol reviews, programs, snd uses; etc. 

Disk* lad use 
Mo typing all the Source Liatlaga Id. Source Code snd, 
where appllcsble, sssembled or conplled Operating 
Programs. The Source and the Discussions In the 
Columns csn be used "aa Is - , or as a 'Starting Point" 
for developing jour OWN more powerful Programs. 
Progrsms sometimes use aultiple Lsngusges such ss s 
short Assembly Lsngusge Routine for reading a 
Directory, which is then 'piped - to s Bsslc09 Routine 
for output formatting, etc. 



BOOK $9.95 

Typeset -- w/ Source Listings 

O-Hole Punched: 8 x II) 

Deluxe Binder SS.50 



All Source Listings on Disk 




1-8" SS, SO Disk - 
2-5" SS, OD Disks 



$14.95 
$2*. 95 



FLEX" 
USER NOTES 

By: Ronald Anderson 

The publishers of 68 MICRO JOURNAL sre proud to 
ake available the publication of Ron Anderson's ITU 
Et NOTES, in book form. This popular monthly column 
• Keen a regular feature In 68' MICRO JOURNAL SINCE 
979. It has esrned the respect of thoussnds of 
68 MICRO JOURNAL resders over the yesrs. In fact, 
n's column hss been described ss Che 'Bible' for 18XX 
users, by sotne of Che world's leading microprocessor 
professionals. The most needed snd populsr f>8Xx book 
svsllsble. Over the yesrs Ron's column hss been one of 
the most populsr In 68 MICRO JOURNAL. And of course 
68 MICRO JOURNAL Is the most populsr 68XX magazine 
published. 

Listed below are a few of Che TUT files included in Che 
book and on dlskecte. 

All TEXT files in Ihe book are on the disks 



LOGOC1 File load program to otlsel memory — ASM PIC 

MEMO VE CI Memory move program — ASM PIC 

DUMP.C I Pnnter dump program — uses LOGO — ASM PIC 

SUBTEST C1 Simulation of 6800 code to 6809. show drfferenovs — ASM 

TERMEM C2 Modem input to disk (or other port input to disk) — ASM 

M CZ Output a Me lo modem (or another port) — ASM 

PRINT C3 Parallel (enhanced) printer dnver — ASM 

MODEM C2 TTL output to CRT and modem (or other port) — ASM 

SCIPKG C1 Scientific math roullnes — PASCAL 

U C4 Mini-monibr. disk resident, many useful lunclions — ASM 

PRINT C4 Parallel printer driver, without PFLAG — ASM 

SET CS Set printer modes — ASM 

SETBAS1 CS Set printer modes — A-BASIC 

NOTE: -CI..C2, etc.-Chspter I, Chapter 2, etc. 

*«Over 30 TEXT files Included Is ASM (assembler )-PASCAl- 
PIC (position Independent code) TSC BASIC-C, etc. 

Book only: $7.95 + $2.50 S/H 
With disk: 5" $20.90 + $2.50 S/H 



With disk: 8" $22.90 + $2.50 S/H 
Shipping & Handling $3 30 per Boot. $2.90 per Dlsl so 
Foreign Orders Add $4.50 Surface Mail 

or $7.00 AifMiil 

If paying by check - Please allow 4-6 weeks delivery 
* All Currency in U.S. Dollars 

Continually Updated In 68 Micro journal Monthly 

Computer Publishing Inc. _ 

5900 Cassandra Smith Rd. !( 



Hixson, TIM 37343 



"FLEX Is s trademark of Technlcsl Systems ConsulCanCs 

"OS9 Is s trademark of Mlcroware snd Motorola 

"68' Micro Journal is s trademark of Computer Publishing Inc. 



(615) 842-4601 

Telex S 106006630 
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/* $27 50 



KDSTAaC-020 Syatea Price* 
Effective November 1985 

Huataeg-020 SBC, wired 6 tested vlth 4 0B25 
Serial ports pre-wtred, ready to Install with 
your cabinet, P/S, CStT and drives $2/50.00 

M020 Cabinet and P/S, for Nut t sng-020, less 
cables $269.95 

M020 Cables, dual floppy or Winchester, specliy 
which - floppy or Winchester.* .$39.95 

H020PC Ploppy cablnat and P/S, holds and powers 
2 thln-Une floppies $79.95 

M020r floppy, 80 track, DO/OS $269.95 

OS-9, SPECIAL Mnatang-020 version $350.00 

MC6&83 IP/P co-processor $495.00 

10 Megabyte Winchester $695.00 

20 Megabyte Winchester $895.00 

UfDCbeater Controller (Xebec- ) $395.00 

Note: for orders ol complete ayatema (Muatang- 
020, cabinet & P/S, disk, drives and OS-9, 
deduct 5X fron total package. (United tlsve 
offer) See opposite page. 

** Special Wlncheater Sot Ice *• 

The Kuataag-020 device descriptors will allow 
you to use practically AMY wlncheater drive 
aupported by XEBEC controllers. 



Include: $3.50 SBC, cables only S/H. Cabinets 
Include $7.50 S/H. Complete System include 
$20.00. All checks must be In USA funds. 
Overseas specify shipping instructions snd 
sufficient funds. 



He Proudly Announce the MUSTANG-020 Super SBC 

"The one with Che RKAL KICK!" 

Only from DATA-COMP 



This is the NCC, world beater CHX SBC, la a super 
configuration. Data-Coup has mated It to a 
power plus power supply/styliah cabinec and your 
choice of floppy and/or hard disk drives. 
Available tn several different configurations, (l) 
single board. (2) single board and regulators for 
your cabinet or mainframe and power supply, <3) 
single board - power supply and cabinet - your 
disk drives. (4) single board - power 
supply/cabinet - our drives configured to your 
apecs, and ready to run. OS9 68K will be 
available as well as several other popular 
operating systems. Also all the popular 0S9 68K 
software and Motorola 020-BUG will be available 
at a very reasonable price. 





This system is the state-of-the-art stsr-shlp. 
It runs rings around any other 68XXX SBC, and 
moat mainframes. The speed and expanded RAM 
make this the "best buy" by a far stretchl A 
true multi-user, multi-tasking computer. So far 
advanced that even the experts don't call It a 
micro. Compared to the others. It Isn't even a 
"horse race." And the price Is certainly right. 
You can bet on this oncl 

So, will It be Turtle or Thoroughbred? 



o 



Dealer & Quantity 
Discounts Available 



Wk 



Mustang-020 is trademark of Data-Comp-CPI 



DATA-COMP 

590t Cassandra Smith Rd 
Hixson. TN 37343 


[C3 




SMIPPIN6 

USA ADO 2X 

FOHFI6N ADO 51 

MIM S2.50 


(615)842-4600 

telex 5106006630 
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Mustang 020 Features 



12.) MUs MC69020 fall 12-Blt vide path Froeeeeor 

- 32-bit vldi non-eutttplesad d«t« t erfdreea hum 

- fti*cK)p instruction each* 

- Object-coda co«fatlble wlcK earlier H680QO N«.ly 

proccaaora (68000/68008/68010) 

- Enhanced frtitructlao act - Coproceaeor Interface 
Optional 6M8I floating point Coproceeaor ((2.5 HRz> 

- Direct extension of (8020 lnatructlaa aet 

- Full aupport of tZSB *75«. draft 10.0 

- Transcendental! and other math function a 

2 fteftabytea of UM <5l?I % 32-blt orgaaltatlen) 
Up to 256K bytoe of IFI0N <6« X 32-Mta) 

- l/aea four 276*, 27128, 27256, or 27512 EPROKe 

4 Aaynchronoua aerial I/O porta (2 K KC68681 QUART) 

- Software prograeaable baud rataa to 19. 2K 

- Standard R3-2S2 Interface 

- Optional network Interfere on one port 
Buffered fl-blt Parallel 1/0 Port <l/2 NC68210) 

- Cant ronlca-type parallel printer ploout 

- Hay atao be weed ae parallel Input port 
Rapaoitoa Coonect or for Additional 1/0 Svvicea 

- 16-bit data path 

- 2)6 byte addreea apaca 

- 2 Interrupt Input* 

- Clock and Control Signals 
TlN-of-Day Qoe k/Cei*s4 a r w/battary backup 
Controller far up to Two 5 1/4- Floppy Halt Orlvea 

- Single or double aided 

- Single or double danatty 

- 48 or 96 tracks per loch (40/80 Track) 
Mounta Directly to a Standard 5 l/4~ Ma St Drlv» 
SASl Interface far Intelligent Hard Uak Controllera 
Frograaaebla Periodic tnterrupt Generator 

- For tlee-allclng and real-Claw application* 

- Interrupt rataa free dcroiecondi to eeconde 

- Mighty Accurate tleebaee (5 PPK} 

5 -bit icnii awltch, readable by the praceeeor 
Hardware alnKle-atap capability 



HUSTAHG-020 laoctuaaria •• 




TIbc Seco.de 




Typ. Sy*[« 32 bit 


Reglarer 


I.E. loop 


1/JOJ l/)Op 


IBM AT 7300 feslx St. 3 9.7 


No ftcgf.tere 


ATAT 7300 OMU FC 68010 7.2 


8.3 


SIC VA2 11/780 UNIX Berkley 4.2 3.6 


3.2 


B*C VAI 11/750 * S.l 


3.2 


6800! OS? 68K 8 Mbz 18.0 


9.0 


68000 " 10 Hbz 6.i 


4.0 


MVSTAKC-020 68020 HC69BBI 0S9 16 M>r 2.2 


0.88 


K3STANC-020 68020 MC6888I WIFLU " 1.8 


1.22 


•• Loop: MelaO 




reliefer loaK 1; 




for (1-0: 1 < 999999; ♦♦!>; 

1 




Eitluttl KITS - KUSTAMC-020 -1.5 HIPS 


Motorola Speca: Buret up to 7 - 8 


NIPS - 16 Xh> 



(615)842-4600 

Telex 5106006630 



For a limited time me mill offer $400 
Trade-in on tjour [& Q — BBOOB or 
66000 5BC, must be working properly 
and complete urith all software and 
cables. Call for more information! 



ACTI0M PROVEN 



Muteof-020 Software 

OS-* 

OS-9 5330.00 

BuleM 300.00 

C CowU.r 400.00 

FortHl 77 *400.00 

r.aul ba>p II «r... 400.00 

otactsorr-riscAi. .»oo.oo 

Stylo-Creph 495.00 

Sty lo-Spe 11 19 5.00 

Stjlo-H«rr> 173.00 

sctarrol* 'Call 

COH •Cll 

** S» dleeouot below 

Oairux 

OiifLa $430.00 

Scre.n Idltor 130.00 

Sort -Hers. 200.00 

EASIC/Pr.Crjojpller. 300.00 

C Cnplltr 150.00 

COBOL 730.00 

•ortree 77 450.00 

SCDISTOt* *CaU 

*• See dleeount beloo 

• Nev lllu 
Standard ay. cob .hipped 12.3 KBx 

Add for 16 Kb*. .68020 $400.00 

Add for 16 Kbx.. 68881 $400.00 

8 Port eap.oaloo board uae tvo 
total of 20 P.S02 porta uirti A 
Te.ted uci $498.00 

SCULPTOR*, ,va are OSA distributor. 
for SCDLFT0H*. Call or .tin for 
alt. llcenae or aultlple dlicounra. 

AA Software OUcootl 
Call for aofeuar. dlaeouotf (roa 10- 
701 for buyera of Eboaa iflrtal, 
from Data-Co. J). Halted off.r. 
Colli 



The M0STAJIG-020 la already on the J obi And winning aclala In industry, 
commerce, business and several government agencies. The delivery times were 
close to schedule. We are bearing back nothing but praise (and more orders). 

If you are considering the purchase of a Mustang-020, be advised that the 
price wlJl Increase In the second quarter of this year. 

Experienced users are awed at the tremendous power and speed of the 
Kustsng-OZO, from Data-Comp. Especially when compared with other 68XXX 
systems, Not only is it more practical than all the others, hut It la much 
more cost efficient. Compare it to any other 68XXX and you will see why! 



Dual 5" 

Bo 


80 trk. Floppy 
Ulncbeacer 








WJ.nc 

1 


heater 1 
Floppy 


. 


020 Board 

Cabinet 

5"-80 trk Floppy(2 

Floppy cable 

OS-9 68K 

Total Syatea 
Lesa SX 

s/a ops 

Total 


$2750.00 

269.93 

1 339.90 

39.93 

330.00 


(1) 

Winchester cable 
Wlocheeter controller 
10 MegByte Winchester 

Total System 
Lest 5X 

S/B OPS 
Total 


$2750 
269 
269 

39 
350 

39 
395 
695 


00 
95 
95 
95 
00 
95 


$'3949 
-197 


.80 

.49 


.00 
00 


$3752 
20 


.31 
.00 


$4809 
-240 


80 
49 


$3772 


.31 


$4569 
20 


.31 
.00 


$4589 


■ 31 rest. 



HOTB: 68881 Co-Proeea.or Add $493.00 

tfolFL&X $450.00 

la. a $330.00 <0S~9) Add $100.00 



With 20 KegByte 
Winchester Add: 




$4789.31 
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Ranald y. Anderson 
>i«0 Sturbridge Court 
Ann Arbor, Hi AfilOS 



Standards 



The firat aalea of PAT have begun. It via not long 
after thla event, that I received a letter Iron a 
purchaser. He had Just bought a new terminal that uses 
the ANSI standard terminal control codes. Pat won't work 
with that teralnal, nor can It be configured by the user 
to sake It work. (Read on here a little please). I've 
prepared a special version of PAT to work with the ANSI 
codes, and atlll be configurable by the user, and I have 
sent a copy to that cuatoaer, ao he is, or will soon be 
In business with PAT. 

Leave It to a committee to foul things up. My favorite 
atory about committees Is the one that goes something 
like the following: There once waa a committed that aet 
out to dealgn a horae. The reault of course waa the 
Camel. Thla ANSI atandard la certainly a Camel. 
Standsrda commltteea seem to obey the following pair of 
rules: 

1. If the manufacturers of the device have been using a 
more or leae de-facto standard, be sure that the new 
atandard is entirely different ao as to obsolete all 
devlcea produced before the establishment of the 
standard. 

2. Be absolutely certain to make the atandard way more 
cumbersome and leaa efficient to uae than the de-facto 
atandard. 

The ANSI atandard aeeta both of those goals admirably. 
Until the atandard came along, nearly every "run of the 
mill" terminal uaed a four character sequence to position 
the cursor on the screen. The sequence ESC , Lead-in 
Character, Line, Column haa generally been uaed with a 
few variations. The lead-in character is generally some 
printable character. Many terminal manufacturers use the 
ASCII code for "-", though there are others. The code 
for line snd column generally uae the binaiy byte value 
that represents that number, usually, but not alwaya with 
the value 32 added to them. (The addition of 32 to the 
line or column value almply geta then out of the range of 
ASCII control characters and Into the printable character 
range). Thua four charactera are used to put the cursor 
somewhere on the screen. What could be simpler for a 
aoftware supplier. Let the user specify the two initial 
charactera, the eacape and whatever the lead-in Is, and 
then let him specify the "offset" to be sdded to the line 
or column number. One alight complication arlaes in thst 
aome of the terminals (Just • few) want the column before 
the line. OK, ask the uaer which cornea firat and set a 
variable value on that basis, and let the program decide 
by the variable value which to aend first. 



Now along cornea a committee and decidea to make the 
cursor positioning string anywhere from 6 to 9 characters 
long. (Remember that some of the new terminals can 
dlaplay 132 columna, requiring a three digit column 
number), to fact the atandard la: 

ESC I LL ; CC H 



This RNSl standard is certainly 
a Camel. 

Leaue it to a committee to 
foul things up. 



Those sre sll ASCII characters, (The control string 
haa no spaces - I've added them for clarity) LL standing 
for the line number as a one or two digit ascll value. In 
other words If you want to put the curaor on line 12, you 
send the ASCII code for 1 followed by the ASCII code for 
2. Simllsrly the value CC la the ASCII code for the 
number representing the column. 69 is sent as ASCII 6 
followed by ASCII 9 (HEX codes 36 39). That means several 
things to the software supplier. First of all, there are 
several "separator" charactera that muat alwaya be aent. 
Secondly, If the line la less than 10, only one ASCII 
character need be sent. That la, the string can be 
shorter by a character if the line or column is leaa than 
10. By aome aort of reaaoning that I don't understand, 
apparently the committee decided that the separators [, 
;, and H would be uaed ao that the line and column could 
be only one character each under aome clrcusstancea. If 
they had made the line two charactera alwaya (uae the 
leading zero), and the column three charactera, the 
string could slways be 7 characters long, namely ESC ( 
LLCCC. They have further simplified things by making a 
value of either or 1 refer to the first line or column. 
In other words, in terms of the default, they have sdded 
sn offset of 1 to the line and column numbera. 

I auppoae there la aome aort of rationale for making 
the numbera decimal ASCII values, but certainly converting 
a byte representation of column 35 (00100011) to $33, $35 
takes some little processor time. If the product Is s 
screen editor thst updatea the column number on the 
screen with every character typed, the overhead is aoae 
1600X. That la to type one character to the screen 
requires 16 more characters. Sight of them position the 
cursor to the place for the column number (actually then 
the column number la output), and eight more charactera 
put the cursor back where the next character la to be 
typed on the screen. Can you imagine running a screen 
editor on such a terminal via modem at even 1200 baud? 



April '86 



'68' Micro Journal 



The old default four character sequence 1* bad enough 
when running software that moves the cursor around the 
screen. Why pake It twice aa bad? Such Is progress! 
Deliver me from ANSI standard terminals. I hope st lesat 
some of the manufacturers are smart enough not to adopt 
that standard! 

Hlxed Hode a Mixed Bag 

We (at the company where 1 spend my workday) have been 
using PL/9 to write programs for about three years now. 
In a few Instances when the program didn't work as 
expected. We've changed statements around a little and 
gotten the program to work properly without actually 
discovering what was wrong. The other day an Instance of 
the mysterious problem occurred, and this time I think we 
figured out what was going on. PL/ 9 bss some rather 
simple rules with regard to handling what Is called mixed 
mode arithmetic. That Is, the sltustlon where you sre 
performing arithmetic with mixed variable types as for 
example, multiplying a REAL variable by an Integer 
variable. The simple esse Is that In an assignment 
statement, all the variables and constsnts In the 
expression sre converted to the type of the variable to 
which the result of evaluating the expression Is to be 
ssslgned. That Is, If you hsve the sltustlon SEAL ■ 
INTEGER * REAL; The Integer will be converted to s REAL, 
the multiplies tlon done, and the REAL result ssslgned to 
the REAL variable on the left of the ststement. 

Thst Is sll reasonable. If you hsve the reverse 
sltustlon, wltb the INTEGER st the left, snd s mixed 
expression on the right, sll REALS In the expression will 
be converted to INTEGER first. If you don't wsnt thst to 
hsppen, you enclose the expression In psrentheses snd use 
the Intrinsic function FIX, which allows the cslculstlon 
to be csrrled out In REALS, the result converted to sn 
INTEGER snd ssslgned to the variable st the left of the 
equal sign. 

Now, whst hsppens In s condition for sn IF THEN, s 
WHILE, or s REPEAT UNTIL? Well, we hsd assumed thst the 
vsrlsbles would slwsys be "promoted" to the type of the 
"highest" type In the expression. To our surprise we 
found thst the vsrlsbles sre all converted to the type of 
the FIRST vsrlsble In the expression. If PI hss been 
defined ss the REAL number 3 .14 159265. .. . you would 
expect IF 2 * PI > 6.1 to evsluste TRUE. However It does 
not. 2 Is sn Integer so PI gets chsnged to sn Integer of 
vslue 3. 2*3 Is not grester then 6.1 so the expression 
evslustes fslse. The ssme "error" hsppens whenever sn 
Integer or byte vsrlsble Is first In sn expression 
contslnlng s REAL vsrlsble. Now turn the expression 
sround to resd IF PI * 2 > 6.1 snd It DOES evaluste TRUE 
since the 2 Is converted to s REAL 2.0 snd the 
multipli cstlon yields 6.2832.... which Is certslnly 
greater then 6.1. 

While this Is not reslly s BUG ss such, but rsther s 
"tbst'a how It works" Item, 1 could find no reference In 
the PL/9 msnusl to mixed mode srithmetic In s condition. 
Nowhere does the PL/9 msnusl stste thst the vsrlsbles In 
sn expression in s condition will be converted to the 
type of the first vsrlsble In the expression. Now thst 
we know thst it works thst way, we will be careful to put 
the REAL first when we do something like thst. Even in 
our real world machine applications, the situation doesn't 
srlse very often. Usually the condition In sn IF THEN is 
s logical condition like End of File or the termination of 
a count ualng byte or Integer variables. I've slresdy 
written Windrush sbout the oversight of not mentioning 
this little possible problem In the manual, but I thought 
I would mention it here for the benefit of the PL/9 uaera 
who read this column. 

I hssten to sdd thst this is in no wsy a complaint 
sbout PL/9 oversll. it is still ay preferred lsngusge for 



applications involving hardware Interfaces. Its output 
code is very efficient snd the fsst single psss compile 
operation saves s greet desl of time thst would otherwise 
be spent waiting for the progrsm to compile for the 389tb 
time. 1 Just wsnted to point out thst the wsy thst PL/9 
hsndles expressions In s condition could csuse mysterious 
problems If not understood. 

Evslustlng Compilers 

1 recently received two more entries In the 6809 FLEX 
eoftwsre area for review. That fact led me to think 
about how 1 sort these compilers out in order of 
desirability . I thought 1 might spend some time here 
discussing esch fsctor thst enters into the process of 
the evsluation. Let me preface this by ssying thst I an 
prejudiced by the fsct thst 1 must use s compiler to 
generste code thst will be Installed in a stsnd slone 
microprocessor system in s product. If I were using the 
compiler for strictly personsl projects, I might hsve s 
little different outlook. If 1 intended to produce 
commercial softwsre with it, 1 might hsve s third point of 
view. 

Language 

For me personally, the language doesn't enter mucb 
into the picture except thst it must be possible to write 
s progrsm thst csn be resd s yesr later by me or next 
week by someone else, snd be understood so thst it csn 
be maintained for a customer. (I mesn maintained even if 
I lesve the company due to my choice, accident, or 
illness). This const rslnt requires thst the lsngusge be 
one of the so called "structured languages" snd rules out 
the "thresded code" languages. Many languages thst don't 
force structured code allow it, and these sre OK if not 
the best to use. 

Compiler Festures 

I sm now talking about the compiler program Itself, 
quite sslde from the lsngusge. Does the compiler allow 
me to list the program? Can I compile It without 
cresting sn output file so I csn see if there will be sny 
errors thst the compiler csn cstch? How good Is its 
error trspplng? (I recently looked st s compiler thst let 
me compile s progrsm contslnlng s Jump to s non-existent 
lsbel snd reported sn error only when the compiled 
progrsm wss run. Unresolved references should be csught 
by the compiler.) 

Time to Compile s Progrsm 

I hsve worked with compilers thst, given s 15 psge 
progrsm would tske anywhere from 30 aeconda to 30 
minutes to compile it. Of course I mesn different 
compilers tske different amount a of time to do their Job 
on the equivalent progrsm. Psrtlculsrly in my work 
applications, I csn't sfford to wsit 30 minutes for ay 
progrsm. Only the compilers thst run in the range of 
three minutes or better for s progrsm of thst size sre 
ussble. I should sdd thst some compilers seem to execute 
in s more or less fixed time, almost independent of the 
progrsm length, while others sre very sensitive to the 
length of the progrsm. The lsngusges thst selectively 
link in llbrsiy routines from s librsiy package tend to be 
more constsnt in compile time. They hsve to resd their 
60 to 100 sector library file completely regardless of how 
msny llbrsiy routines they copy out to the output file. 

Output Code Size 

Hy recent tests of s couple of new compilers brought 
sbout s new test progrsm. It would seem ressonsble to 
see how Snsll s progrsm csn be compiled efficiently. 
Hence my new test progrsm thst simply prints "Hello 
There" to the terminal. The two recent compilers scored 
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6800 bytes for one of them and 600 for the second. PL/9 
(■y standard of comparison) compiled 90 bytes for that 
program. 

Don't Jump to conclusions on thst one test, however. 
It Is no better than s single "benchmark" for evaluating a 
compiler's output code execution speed. Some compilers 
have s large package of runtime routines thst ire 
Included la the output code, but then they generate 
amsller Incremental code per line of user progrsm thsn 
others. 

A prime example of this sort of s compiler Is Lucldsts 
Psscsl. Thst Psscsl implementation la s P-Code compiler. 
Thst Is, tbe compiler trsnalates the Input source code 
Into sn Intermediate code thst Is essy to Interpret, sad 
the user progrsm Is then "bound" to s portion of the 
Interpreter, hopefully only thst portion aecesssry to run 
the progrsm. Lucldsts Psscsl bss s ressonsbly smsll 
Interpreter, sad Is very efficient st generating the 
Incremental code for the user progrsm. Therefore, though 
It looks Inefficient for s very small program, s compiler 
thst hss s vary inU runtime package but generstes code 
less efficiently soon cstches up with It In progrsm size. 
You must therefore test small programs and large onea In 
order to get a feel for the compiler. 

In the preaent case, I wrote s aquare root routine for 
the compiler thst generated the very large code for 
"Hello There". Hy simple program to Input a number and 
find lta squsre root genersted 10,300 bytes of code sad 
It took 1.64 seconds to find the square root of 3, though 
It did so to 9 digits precision la that time. 

I coded that ssme progrsm In PL/9 snd It genersted 
1213 bytes of code, sad found the squsre root of 3 In 
0.070 seconds. I wrote the supplier of the new compiler 
thst s new compiler that generates 8 or 9 times aa much 
code snd executes the aaae progrsm 23 times slower thsn 
sn already available one doesn't hsve much going for It. 

Hardware Accessibility 

This snd the next sspect of compilers sre probably 
more Important to oe ss sn Implementor of progrsms thst 
run hsrdware, than some others. If the language or the 
compiler Implementation allows the user to specify s 
variable AT a memory location. It la essy to acceas 
hardware aerial and parallel ports directly. One simply 
declares s BYTR or INTECER variable st the sddress of the 
port snd then either assigns values to the port to write 
to It, or ssslgns Its vslue to snother variable to read 
from It. Paacsl snd PL/9 hsve this feature. C uses 
snother method thst Is equally useful. You simply creste 
s pointer snd point It st the port sddress. You csn 
then reference the port ss s memory location via the 
pointer and read from or write to It. 

Assembler Code Interfsce 

If you sre reslly concerned with speed, or hsve some 
fslrly complex hardware attached to the computer ao that 
you want to use drivers written In assembler. It Is nice 
If the compiler allows you to write procedures or 
functions In assembler snd connect them to the compiler. 
Alternately, you msy be able to embed assembler code la 
the compiler source code. 

Portability 

For ay work projects, this doeso't enter Into the 
picture greatly, but for most people. Including software 
suppliers, It la very lmportsnt. PL/9, though my 
overwhelming choice for aost every other resson. Is s 
speclsl language written for the 6809. Programs written 
in It sre simply not portable to other procaaaora or 
operating aya tarns at this time. (A 68000 croaa compiler 



la In the mill, ao that PL/9 programa may aoon be 
portable to 68000 ayatema.) The very best language for 
portability la "C", and It aeema that the Implementora 
hsve realized thst fsct snd msde their compilers VERY 
stsndsrd. 



Thanks to the foresight of 


Kernighan and Ritchie in 


keeping to the "de facto" 


standard library, if 1 write 


a program that runs in "C" 


on one computer, it is uery 


likely .... to run on another 


computer. 



Notwithstanding the words of Bud Psss la his column 
sbout the various versions of "C" thst run under PLEX, 
snd how tbsy don't sll hsndle everything Identically, "C" 
la head and ahouldera above Paacsl for portability. The 
msln resson Is thst though "C" doesn't hsve sny 1/0 
functions In the "bsse language" It bss s stsndsrd 
llbrsry, usually written In "C" thst provides sll the 1/0 
functions Including s choice of low level disk Interfsce 
or high level disk Interfsce. 

Thsnks to the foresight of Kernighan and Rltche in 
spelling out these lnterfsces, snd to the loplementors In 
keeping to the "de fscto" stsndsrd llbrsry. If I write s 
progrsm thst runs in "C" on one computer, It is very 
likely to require only minor modifies tlons to run on 
snother. I apeak from the experience of having 
translsted my JUST progrsm to "C". It is sbout 1000 
lines of code, snd the difference between the McCoah 
version thst runs under PLEX snd the Lsttlce "C" version 
thst runs under MS-DOS Is sll In 5 lines of code, dealing 
with determining whether output la going to the printer 
or tbe terminal. In addition, one constsnt is declsred 
to be SOD In the FLEX version snd $0A in the MS-DOS 
version because the two operating systems hsvs different 
"stsndsrd" text files. Flex text files use CR to eod s 
line snd MS-DOS uses LF. 

The problem with Psscsl In this regsrd Is thst file 
operstlons are not even defined la the language stsndsrd. 
This Is not s criticism of the lsngusge, which wss 
originally developed to be run on large mainframe machines 
to teach students how to write programs. The lack of s 
stsndsrd or sn exsmple, however, bss led to every 
Implementor of Psscsl handling the opening snd closing of 
files In s different manner. Some Psscsl Implementations 
get arguments from the command line, and aome do not. 
With the first, you csn Include s filename on the command 
line that runs the Psscsl progrsm. With the others, you 
hsve to do It the BASIC wsy, snd prompt for s filename 
from within the progrsm. 

Source Code Readability 

I touched on this In the Introductory remsrks. 
Readability or "self documentation" Is desirable when code 
has to be maintained over s long period snd by more than 
one peraon. The languages thst srs considered to be 
"structured" such ss Psscal snd C (snd msny of tbe 
specialty languagea like PL/ 9 and Whimsical), produce code 
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chac is more readable Chan nany of Che other languages. 
In case I've loac anyone here, structured programming Is 
programming using techniques of loop control chac avoid 
using GOTO or lea equivalent. Structures like DO WHILE, 
REPEAT UNTIL, and FOR, all serve to clarify the extent of 
loops, and show the structure of the program better. 
Things lllce Pascal'a CASE statement or the equivalent 
SWITCH statement la C, also are much clearer than a long 
string of nested ELSE atatementa. 

The requirement to "declare" variables and to specify 
their type (Integer, Byte, Character, Real, Boolean, etc) 
ia a great aid to someone reading aoneone else's progrsm. 
The use of meaningful variable namea is of course a 
matter for the programmer, but some languages only allow 
two or three character namea (moatly BASIC) which make it 
impossible to make them very meaningful. 

All of the "structured" programming languages have 
provision for compound atatementa, a group of statements 
surrounded by some sort of bracketing worda (BEGIN-END, 
IF ENDIF, or aymbols such as {}. Once you have used 
these niceties it is bard to program In a language that 
doean't bave them. (Maybe rsther thsn bsrd, I should say 
awkward or uncomfortable). 

Of course comments are the programoer'a prerogative, 
but a language tike Pascal or C requires far fewer 
comments to explain it than a language that has less loop 
control structures and requires frequent use of SOTO. 

Language "Verbosity" 

No, I'm not trying to be funny. Verbosity is ay term 
for the "wordiness" of the aource code. Being 
calculation oriented, I think the height of verbosity la 
found in COBOL. ADD 2 TO A GIVING C seems a little 
excessive when In most languages the statement looks more 
like C-A+2. Verbosity and readability are somewhat 
connected. You night prefer the "inde*-t-2;" of "C" to the 
INDEX - INDEX f 2; of other lsnguages, but the second 
form is probably more readable at least until you get 
uaed to the shorthand of "C". The curly braces {} of "C" 
wbicb replace BEGIN and END, on the other hand might 
appeal to you as almply producing a less cluttered looking 
program. 

Execution Speed 

I've aaved this one for near the end of the discussion 
becauae I think it is usually overemphasized in the 
testing of compilers. To discredit a compiler that 
scores well in sll the other areas simply becsuse its 
output code executes hslf as fast as the fastest one 
might be very foolish, particularly If the application 
doesn't demand blinding speed I Any compiler whose output 
code executes fast enough for the application, la worth 
considering. I note thst aa a general rule, the 
compilers that compile smaller output code run fsster as 
well. 



Documentation 

I mean here, the instructions that come with the 
compiler. Documentation can range from aeveral pages to 
aeveral hundred pages. The lsrgest and beat 
documentation I have ever seen ia the two-volume aet that 
accompanies PL/9. It is both a technical reference and a 
tutorial on using the language. Hany of the Standard 
Language compllera almply state outright that the manual 
ia not a guide to learning the language, but contains 
instructions on using the compiler itaelf. There are 
■ any excellent books on Psacal and "C", and the manuals 
thst accompany those compilers usually contain the 
author's recommendatlona concerning books that will teach 
you the language. 



Some documentation is ao-ao, the authors using "cute" 
variable names and peculiar examples that do nothing but 
confuse the reader. The author Is usually ao familiar 
with his compiler or the ayntax of the language he has 
invented (in the case of a non-atandard language) that 
his examples lack clear explanations, or are missing 
altogether. I tend not to worry terribly about 
documentation, being sort of adventurous and willing to 
try, and fall a few times before becoming discouraged. 

Whatever you do when that new compiler arrives, don't 
sit down and read the manual from cover to cover, word 
for word, four times. You'll become discouraged. You 
don't have to know every possible feature of it to start 
using It. Skim through the manual briefly. Read the 
part on bow to use the compiler. Then type In the ususl 
test program of a few linea and compile and run It. Now 
gradually expand your test program to try various 
features of the compiler or language. If you don't need 
certain functiona for the sort of things you normally 
program, don't bother learning them. If you ever do need 
them, the manual will be there for you to read. 

Compiler Size 

Thia la usually but not always related to the time to 
compile a program. Some of the compilers, (for aome 
reason the "C" compilers in particular) are very large, 
occupying aome 600 disk sectors with all their various 
parts. Obviously If you have a Single Sided, Single 
Density 5 1/4" disk drive, the compiler requires two 
disks, which may not be practical if there ia not a 
convenient way to split it into a couple of operations. 
Even if a compiler of this size is very fsst in execution, 
you atill have to read all 600 sectors every time you 
compile a program. The disk access time to read the 
compiler and runtime llbraiy might be the largest part of 
the time to compile a program. 

*** END *** 

More Feedback 

Everett Greene who has corresponded with me several 
times In the past, bas written to dispute my claim that 
higher level languages result in ouch less source code 
thsn assembler does. He didn't disagree with the claim 
that aometimea or even usually the high level language 
aource la aborter than the aasembler aource, but he 
found my 5 to 10 tines shorter claim to be excessive. Be 
did say that perhaps such ratios could be reached In veiy 
calculation intensive programs. 

Well, Everett, I have a 12 page calculation in 
Assembler that reduces to Just about 12 linea in a high 
level language. That ia approximately a SO to 1 
reduction. I will grant, however, that aome programs, 
particularly abort ones can be almoat the aame number of 
linea. Juat about anything I've tried has however been at 
leaat reduced to half the linea when done In a high level 
language. Perhaps 5 to 10 timea la too high for an 
"average" program for you, but It is not, for the types of 
programs that 1 do. 

Wrap Up 

Well, I've finally done it. This month'a column Is too 
big to edit In a alngle "chunk". I will have to break It 
off very aoon. 

I Juat have to mentioo one more thing. The company 
baa ordered a "Mastaog-020" computer from Data Corny. I 
am anxloualy waiting for it with a copy of Hicroware "C" 
for it in band. The first order of bualneas will be to 
finish a version of PAT In "C" for it. I have atarted the 
conversion process but the Mustsng will speed up the 
process greatly. 
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ONE DOBS AMD KAVT MORE TO CO! 

This Is an exciting month! This month marks the one 
year anniveresiy of the BASIC OS-9 column. Laat year In 
April, the column made lta debut la the 66~ Micro Journal. 
It waa an offspring of a previous column that appeared la 
Color Micro Journal. I learned from writing that column 
that It waa Impossible to write one specific sres 
without getting Involved In the entire OS-9 spectrum. 
From talking and listening to other OS-9 users, I feel 
there Is a need for useful Information and programs. 

The columna have Included using the commands, 
understanding the system snd knowing the languages that 
run on OS-9. Hopefully there is something for everyone. 
The monthly programs were in Pascsl, Baslc09, C and 
Aaaembly language. They Include utilities, general 
purpose and fun program*. Maybe sometime in the future 
we'll be able to offer them on disk for those who don't 
like to do all that typing. 

Some of fun things hsve been the reviews for the 
different OS-9 products out. I hsve received letters 
from readers. I even had one reader abow up at the door 
to "shake my hand." All In all, I would ssy It has been 
sn exciting yesr. But so much for my sentimental 
r amblings. Onwsrd to the future and full speed aheadt 



MEMORIES 

This month I was planning on talking about memory 
and the OS-9 module. RAH, as it la aometimea called, 
peralta tbe computer to aerve the operator. It makes 
the computer a versatile and flexible tool. In recent 
times the amount of RAM one baa, baa become aynonymoua 
with the power of the system. I overheard one computer 
enthualaat remark that he waa limited by the amount of 
BAM he bad. Juat 16K more memory waa all he needed. 
How we uae memory la Important. In OS-9 memory la 
managed by the "kernel". 

The kernel la at the heart of OS-9. Or perhapa it 
la more appropriately called, the brain. It baa a number 
of extremely important Joba. It acta aa the 
administrator, supervisor, sod resource manager for the 
ayatem. It takea care of system initialization. It 
proceaaea interrupts snd seivlce requests. The kernel 
alao managea multiprogramming and memory. ( Aa a aide 
note, if you enter MDIR, you won't aee its name in the 
module directory. There are two modulea that you will 
aee. They are 0S9F1 and 0S9P2. They maka up the 
kernel.) 

Memory management la important to the ayatem. The 
pbyalcal aaalgnment of memory must be taken care of. It 
differs between Level I and Level n ayatema. On Level I, 
all memory la contained in 64K of RAM. OS-9 and the 
uaer* share a common memory spsce. On Level II, OS-9 snd 
esch user is aaaigned a private memory apace. The size 
of It msy contain up to 64K bytea, depending on the 
hardware configuration. All users may ahara a module, 
but RAM for data la aaaigned in each user's memory map. 
In either caae, memory modulea muat be aaaigned to 
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locatlona. Data areaa are aaaigned to them. Their 
names go Into the module directory. The kernel hsndles 
sll of this, bssed on Informs tlon In the memory modules 
format . 

The memory module is the only thing thst gets loaded 
into memory. The module baa a apeclfic format that 
passes information to the ayatem. It'a general format 
looka like: 

Relative Uae 

Address 

$0000 Module header 

$0009 Execution Offaet 

$000B Permanent Storage Size 

Hodule'a Body 

CRC Check Value 

The module header contalna information about the 
module itself. It tells the module's size snd nsme. It 
contsins the module type snd lsnguage. It glvea lta 
attributes snd revision. DLL tell more sbout it Later. 

The execution offset is the relative atart address 
from the first byte of the module. This is where the 
program ia to atart execution. Some modulea may have 
multiple entry points. For example a device driver could 
have a table that looka like: 

START lbra HttT loltlallze drive 

lbra READ read from device 

lbra WRITE write to device 

lbra CETSTA get atatua 

lbra PUTSTA aet atatua 

lbra TERM termloste device 
This tsble offers 6 points of entry in it. 

The permanent storage site la the amount of memory 
the module needa to run. It is allocated at the time the 
module is crested. How it Is allocated dependa on the 
way the module la created. An aaaembly language program 
may declare aoae variablea like: 

A rmb 2 

B rmb 2 

NAME rmb 10 

Tbla aaya that our data area muat be have at leaat A 
bytes for two Integers and 10 bytea for a atrlng. At run 
time, a data area will be aaaigned to the program. The 
atandard configuration ia: 

LOW MEMORY ADDRESS 

DIRECT PACE AND 
DATA AREA 

PARAMETER AREA 



— > 



HICH MEMORY ADDRESS 
These registers are acting aa pointera to the data area. 
The integer, A, will be at the location pointed to by U 
and DP. B will be 2 bytea past U or location 0+2. NAME 
will be at U+12. The X register and Stsck Pointer point 
to the bottom of the dsts area. Whenever anything is 



10 



April '86 



'66' Micro Journal 



pushed onto Che atack Che pointer move a upward Coward 
Che daca area. Hence Che OS-9 assembler manual' a warning 
Co supply a generous atack area for your prograas. The 
paraaeter area contains the parameters passed with an 
OS-9 command. 

The nice thing about OS-9 Is that It can change the 
data area alze at run tine. To the end of a comaand 
can be added: 

foK or fa 
where n Is the amount of memory desired or a Is the 
number of pages. The data area will be dynamically 
lncreaaed. Commands like COPY or BACKUP will use the 
extra memory you give It. It will Improve their 

efficiency and apeed. 

The OS-9 EDIT module la a command that you use 
extra memory. If you want. Normally It uaea about 4K of 
memory, but you can ask for more. Alao, you can get more 
memory from It after It la running, by using Its K 
comaand. Entering a: 

E:H10000 
will cause EDIT to Increase Its data area alze by getting 
■ore memory froa the aystea. Another solution Is to 
alter the aodule EDIT ao that It Immediately geta the 
larger data alze. To do this try the sequence: 

0S9:renaae edit edlt.bak 
0S9:losd edlt.bak 
0S9;debug 

Interactive Debugger 
DB: 1 edit 

9900 67 
DB: . .*0b 

9909 0C 
DB: -27 

9909 27 
DB: q 

0S9:aave edlt.teap edit 
0S9:verlfy u <edlt.teap >edlt 

You now have an EDIT that has over twice as aucb buffer 
apace. What we did was load EDIT Into memory, use DEBUG 
to change the byte at relative address $09 froa $0C to 
$27, SAVEd a temporary version and uaed the "u" option of 
VERIFY to correct Its CSC and make a new file. If 
everything worka you can delete the backup and temporary 
files. 

The models body Is where the program code goea. It 
may I-Code generated by Baslc09. Or perhaps It la P-Code 
from the Paacal Compiler. It may be machine code created 
by an aasembler or froa C source code. The Information 
may not even be executable like the device descriptor. 

Last Is the CKC number. The cyclical redundancy 
check Is a special 3 byte number that comes at the end of 
the aodule. It la calculated starting with the first byte 
and continuing up to the CRC number, the laat three 
bytes. It Is used to check If a module la Intact. 

DIUCTO&Y ALPAHnETTZIi UVXSTEB 

Laat November In the column, I presented a C program 
called DALPHA. The program would alphabetize 0S-9 
directories. Things did not go smoothly for many. I 
received a letter from Wayne Setzer of Charlotte, NC. 
Wayne writes that at beat by reducing the LENGTH of the 
directory storage to SO entries, he geta a atack 
overflow. When It la set to the LENCTH In the program, 
ISO antrlee, the system hangs up. David Lynde'a letter In 
the January 68 HJ, polnte out "When running on a large 
directory the program hung up completely. . .any program 
that baa more than 1000 bytea of 'auto* variables would 
encounter this problem." Well there Is a problem. I'm 
guilty! I feel like the chef who gave out a recipe, but 



didn't tell bow to cook It. In this caae, the prograa la 
correct, but the method to compile It needs revealing. 

Let'e talk a little about C programs. When you 
write a progrsa. It geta titled "mainO". The C compiler 
turns It Into a linkable module. The "mainline aodule" la 
catart.r. It aeta up the variable area. It prepares 
argv and argc. It alao adjuate the Y register to point 
the start of memory. Finally a "lbar main" la made and 
your program la running. Clink combines everything and 
makes them Into a single memory module. The memory map 
for a C prograa looks like: 

LOW MEMORY ADDRESS 

DP.Y --> - 

DIRECT PAGE VARIABLES 
DATA AREA 



SP 



--> 



STACK 



PARAMETER AREA 



■emend — > 

HIGH MEMORY ADDRESS 
This an overly simplified map of Ca data apace. The DATA 
AREA Includes Initialized and uninitialized data, 
requested memory, free memory. The concept however Is 
elmllar to whet we dlecueeed before. The parameters that 
were paaaed can now be gotten with the argc and argv. 
In the actual C program the Stack Pointer Is adjuated so 
that variables can be referenced to It. 

Ideally, memory should be something that need not be 
worried about. The Tandy (Hlcroware) C User'e Guide aaye, 
"If not Instructed otherwlee, the linker will automatically 
allocate Ik bytea aore the what total alze of the 
program's variables and atrlnga." If you run IDENT, the 
0S-9 command that reports Information about a module. 
On DALPHA, you would find that It hae 1355 bytea of memory 
eet aside. Hardly enough for an array that la 32X1S0 
bytes, plus a handful of lntegere and atrlnge. DALPHA 
requires about 4820 bytea of storage. If you believe the 
C manual, then there should be an exceaa of the required 
amount. But there Isn't] The result Is DALPHA goes 
beyond Its allotted area and gete Into areaa. It 
shouldn't. The ayatem hangs up, a atack overflow occurs 
and ao on. 

The linker provides for the amount of memory used by 
the program, baeed on the needs of linkable modules that 
go Into It. Cetart.r needs 1 byte DP, 80 bytes for data 
and 696 bytea for stack apace. This la a total of 977 
bytea. At link time about 16 modulee are uaed In DALPHA 
that come froa the C Library, cllb.l. Moet do not 
require any memory, but 6 do. They are chcodea_c(129 
bytea), lo b_da t a_c( 206), pfldumay_c(3), mea_a(2), and 
prlntf_c(36) . The" total for the library modulee la 378 
bytes. Add that to what catart.r needa and the grand 
total le 1335 bytea. And that la what geta allotted for 
DALPHA. The main module geta nothing. If you examine 
the asaeably Hating of It (uee ccl dalpha.c -a), you will 
see that the paect aaka for bytes of stack memory 
(which It should) and there are no vaecta to create data 
memory. 

There la a eolutlon. The C compiler has an option 
to change the data area elze. The main neede 4620 
bytea. Allowing for some breathing room, let's give It 6k 
more memory. That should be plenty. So when compiling 
DALPHA try entering: 

0S9:ccl dalpba.c -a-6k 
At link tlaw the memory module that la created will have a 
larger data area, made of the extra memory needed, plus 
what the other aodulea need. When DALPHA runa, you will 
have enough memory. 
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One thing ehould be mentioned for eaaller programs, 
1 wouldn't be reel worried about the memoiy situation. 
Not neceeearily la all the memory being used at any one 
time. The cetart.r module has etack memoiy eet aelde for 
ell the 1/0'e and even a "fudge" factor thrown in. But if 
your programs have msny variables, it would be wise to 
coneider ataory. The consent in the C manual that the 
average programmer should not be concerned with memoiy 
allocation, should be taken with a grain of sslt. 

Ae a peace offering, thla south I am giving s new 
version of DALPHA. This one is alalia r to the old version 
since the aaae routinea are uaed one way or another. 
There la one important exception. The storage area for 
the directory la dynamically allocated. There la a system 
call, abrk(), which geta free aeaoiy froa outside the dets 
sres. The sdvsntsge is soy size directory could be 
sorted. Larger ayateaa with large directories will have 
sore aeaory available. So this one should work for 
everyone. 

I hsve slso sdded line numbers to sake it easier to 
trsnscribe and refer to the program. At David Lyode'a 
auggeation on the laeekQ command, 1 have used uppercsse 
letter "L". The "I" Bakes the "0" a long integer which la 
required by the call. LaeekO appears on lines 52 snd 
162. 

The hesder on the program Includes instructions on 
how to compile. That's on line 12. The "-e-2" tells the 
coapiler to make the module's edition number 2. Thst way 
you should be sble to tell It from the first In the 
directory. tunning IDENT will tell the modules edition 
number. 

Once sgsln, 1 sm sorry to hsve cauaed anyone 
confusion. 1 think this second version is more 
intereetlng snd eaaier to uae. If problema ever do arlae 
with a program, pleaae write me and let me knov. Or if 
you have a question regarding OS-9 drop me a line, m 
aee if I can help. Be sure to include a SASE and tU 
eend you a reply. 

In the future, I will talk more about the memory 
module header and more about C Language memory allocation 
with the Micro ware C Compiler. Until then, take carel 

1 

2 

3 

4 

5 

6 

7 

8 

9 
10 
1 1 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
23 
26 
27 
28 
29 
30 
31 
32 



/a Program to alphabetize directories 

By Ron Volgts December 23, i9B3 

For 68' Micro Journal. Basic OS-9 Readers 

Usage i 

0S9idalpha 

0S9idalpha /dO/A_DlRECTORV 

The first example alphabetizes the 

current data directory. 

The second effects a specified directory. 

To compile usei ccl dalpha.c -e-2 
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33 
36 
37 
38 
39 



sinclude <stdlo.h> 

edefine aasfc(c) < <c)«,"\137' I 

edefine DIR 128 

Sdeflne UPDATE 3 

Sdeflne LENGTH ISO 

Sdeflne O.UPDATE DIR»UPDATE 

edefine E.fiEAD 244 

edefine E.MEMFUL 207 

Sdeflne E WRITE 243 

sdeflne DilZE 32 

malnfargc, argv) 
Int argci 
chsr lergvMi 
< 

int path, countl 

char sdlrna*«""."l 

char «a, ItBrUli 

long p. laeekoi 

/• check for too many parameters «/ 
if <argc 2) t 

prlntfC'Too Many FararaetersVn") 1 

ex i t ( 1 > l 
) 



40 
41 
42 
43 
44 
43 
46 
47 
48 
49 
SO 
51 
32 
S3 
54 
55 
56 
57 
58 
59 
60 
61 
62 
63 
64 
63 
66 
67 
68 
69 
70 
71 
72 
73 
74 
73 
76 
77 
78 
79 
80 

et 

82 

S3 

84 

B3 

86 

87 

88 

89 

°0 

91 

92 

=3 

94 

93 

96 

97 

98 

=>9 

100 

101 

102 

103 

104 

105 

106 

107 

108 

109 

110 

in 

112 
113 
114 

113 
116 
117 
118 
119 
120 
121 
122 
123 
124 
123 
126 
127 
128 
129 
130 
131 
132 



/* enact for alternate dirctory »/ 
if (argc""2> 

dlrna»e»argvC 1 3| 

/« Open directory «/ 

if ( (path>ooen(dirnaae.D_UPDATE) > -- -1> ; 

prlntf ("Can* t OOan %s\n" .dlrnama) i 

ex 1 1 < 1 ) I 
J 

/• Directory ■>:■ t/ 
p>lseel (path, OL. 2) i 

/> get some free area for the directory 1/ 
i f ( (q-sbrh ( (int! <p! ) ) ••-!> 
«*ittE_MEMFUL)i 

/« read In directory »/ 
count -getdlr (path,q) \ 

I* sort the directory t/ 
sortdirlq, countl I 

/t write the directory out */ 
putdirfpeth, q. count) I 

/* cl Dse the file *t 
close(p) | 

3 't end of main program »V 

/» reads directory into location 

pointed to bye entry %/ 

getdir (p, entry) 
int p| 

char (Sentry) CDSIZEli 
C 

int state. c-Oi 

reset (p) ( 

while ( (state-read (p, entrytcl. DSIZE>> > NULL) 
c»*i 

if (state— -11 
exi tcE.READ) ■ 

return (c) i 
3 

/» sorts directory using bubble sort */ 
sortdir (entry, c) 
char (Sentry) CDSlZElt 
int cl 

int 1, j. post 

for (i»2i i!C-t» i**) { 

pos-i j 

for (j-i»li i<cl j**) 

If (compare(entrytposl ,entr'/C jl) > 0> 

POB"j| 

if <1 '• pos) 

swap lentryt 1 3, entryCpoftl) I 
) 



/> put directory bac I XI 

putdirlp. entry, count) 

int p. count) 

char (SentryllOSIZEJi 

C 

int 1; 

reset (p) | 

for (i»0i l countl i »*) 

if larittlp, mntryCil. DSIiE) «■ -I) 
exit (E WRITE) | 
> 



/» cowapare two dlrectry entries S/ 
coaovtfti t) 
char ts, »ti 
< 

int 1| 

If (sC03 " -SO') 

return ( 1) 1 
if (tC03 « '\0'> 

return(-l ) l 
1-0| 

while ( mask(sCi3) » masMtCi 3) >< 
If (sCU > ^177') 

return (0) i 
else if (tCi 3 > , \177' ) 
returndl I 
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133 i**I i44 

134 ) 145 

135 return (mask IsCi 3>-«ia»v IttlJ) ) i 146 

136 i 147 

137 14S 
13S 14? 

139 /» «x*">p two entries */ i30 

140 »«*p(». t) iSl 

141 char ««. tti 133 
143 < 153 
143 char tanporarytOSlZEJi 134 



copy's, temporary) i 

copy<t. S)| 

copy (temporary . t) t 



/( copies al into *2 */ 
copyfsl. »2> 
char t*l. ••:« 
C 

lnt II 

*or <i»Ol i DSIIEi !♦♦> 



36 ) 



1 

1 

137 

138 

139 

160 

161 

ier 

163 
164 



»ct» :=*it» 5; 



/• raturn -fila pointar to start «/ 
rtiit (p> 

int Pt 
( 

lwil (p, OL. O) ; 



"C" 

User Notes 



E. H. (Bud) Paaa, Ph.D. 

Computer Systems Consultants 

1454 Latta Lane, N. W. 

Conyers, CA 30207 

404-483-1717/4570 
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Tbla chapter continues the discussion of the design and 
Implementation of a portable text editor by beginning 
the development of a modal for interfacing terminals and 
printers. It alao providea aoae Information on the 
never veraiona of the Wlndrush-McCosh C compilera for 
FLEX. The example C program aaaiata the user in 
converting TSC word-processor format filea to STYLO 
format. 

W1NDRUSH-MCC0SH C COMPILER 

The lateat (aa of December 1985) veralon of the 
Wlndrush-McCosh C compilar, number 26.2:1, la available. 
However, it requires a MEMEND of $BFFF, precluding the 
loading of any auxiliary programs, drivers, etc.. Into 
uaer memory. Thla makes lta uae inconvenient or 
impossible on many ayatema. New versions eliminating 
thla problem, allowing split llnea and allowing long 
atrlnga are premised but no releaae date ia available at 
thia time. 

** New veralone are now releaaed and do not have the 
$BFFF restriction *« DMW 

For tboae with an lncereat in auch mattera, Wlndruah 
provided the following update history (restricted to 
veralon 26 only) : 

26.0:0 10/17/84 

added unaigned char type declaration 
26.0:1 01/11/85 

fixed assignment opa and register vara 
26.0:2 01/22/85 

fixed binary opa with reg var on rha 
26.0:3 01/27/85 

optimized chara and aero constsnts 
26.0:4 01/30/85 

fixed complex expreaalon evaluation 
26.1:0 03/14/85 

added FILE and LINE macroa 
26.1:1 03/22/85 

fixed while parser 
26.1:2 02/05/85 

made loader compatible wltb ar under qulx 



26.1:3 06/10/85 

fixed complex typea declaration 

26.1:4 08/01/85 

fixed FLEX atandard library 
fixed preprocessor error handling 
fixed error writing temp file 

26.1:5 08/25/85 

fixed alzaof (expreaalon) 
26.1:6 10/02/85 

provided correct atdio.h with optimizer 
26.2:0 11/10/85 

required HEME TO of SBFFF 

TERMINAL AND PRINTER INTERFACE MODEL 

If an editor ia to he capable of heing used in a robust 
manner with s vsriety of terminal end printer devices, 
lnterfsce models must be developed snd Implemented. The 
development sad implementation of a model which will 
support optimized use of most festures of most printers 
sod terminals ia a difficult taak. Unfortunately, tbe 
existence of many commercially-available edltora which 
work properly with only a small number of typea of 
terminals and printers demonstrates that auch a model 
waa never envlaloned during their development. 

Features of terminals and printers which should be 

modelled Include: 

such elementary Items aa the following: 

the number of rows and columns, 

bow to clear the acreen, 

bow to aound the alarm, 

how to page-eject, 

If the cursor automatically moves to the 

next line sfter reaching the laat column, 
such non-elementary Items auch as the following: 

how many psges of memory, 

how to set the cursor position, 

how to read the curaor poaitlon, 

how to move the cursor relative to lta position, 

bow to set screen sod cursor sttributes, 

bow to use alternate fonta, 

how to turn printer port on and off, 

if e terminal can lnaert and delete characters, 

If a terminal can lnaert and delete lines, 

if s terminal haa local edit modes, 
sod such problems aa tbe following: 

It Is s Beehive or Hazeltlne terminal, 

It cannot perform a cr without a If, 

it haa no page-eject, 

it cannot eraae acreen attrlbutea 
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without clearing the screen. 
It Ignores If after an auto-wrap, 
It requires padding characters for time delays, 
etc. 

Bather than develop still another model, this editor 
uaea the termlnfo and termcap Methods of describing 
terminals sad printers, aa used on UNIX sad certain 
relsted systeas, although with variations. Teralnfo and 
teracsp descriptions are lists of capabilities, padding 
requirement*, initialization sequences, and deacrlptlooa 
of valid operatlona and how to perform then on named 
devices. 

Teminfo files each describe one class of device, In 
compiled format, and are organized into a 

tree-atructured directory ualng the first character of 
the device name as a second-level-node name. 

Following is s list of teralnfo entries, including the 
names by which pointers to the entries may be referenced 
in C programs on these systems; 



Pointer Name 



Teralnfo Description 



Boolean (indicate that the d 

auto_left_aargln bw 

auto_rlght_aargln «m 

beahlva_glltch xab 

ceol_atandout_gllteh *hp 

eet_oswUoe_glltch xial 

trm overs trlke 10 

gene rTc_C y p e gn 

herdjeopy he 

b*a_»«ta_key km 

bse_stttusllDs ba 

lneert_null_f llteh la 

meaory above da 

aemory^alow db 

aove_lnsert_mode air 

aove_etaadout_mode aagr 

overjitrlke oi 

otatua Una escjek aalok 

telersy glitch « 

tllae_*Tlcch hi 
transparent underline ul 

xon aoff xon 



ivlee hat soma feature): 

Cubl wraps froa col co leat col 
Terminal has autoaaclc margins 
Baahlva (fl-eacepe fZ-etrl C) 
Standout ooC eraeed by overwriting 
Ktwiloa Ignored after 80 eols 
Can araae overatrlka with blank. 
Generic Una type 
Hardcopy terminal 
Mat a key 

Extra statu* Una 
loaart soda distinguishes nulla 
Display ratalned above screen 
Display ratalned below acreeo 
Safe to aovi while la Insert mode 
Safe to move lo araadouc modes 
Terminal overitrlk.es 
Escape cao be uaad on status Una 
Tabs destructive magic so char 
ttsseltloe; can't print tilde 
Underline cbaractar overetrlkea 
Terminal uaea son/xoff handshaking 



•umbers (provide tha value of aoae device parameter): 



columns cola 

lnlt_taba It 

Unsa lines 

llnee__of memory 1* 

aaglc~cookla_glitch sac 

psddlngjbaud^rate pb 

virtual terminal vt 

width etatua Una wal 



Strings (provide a 
beck_teb 
ball 

ear rlaga_ra turn 
ebange_acroll_regl 
elaer_oll tabs 
elaarjLcrtao 
clr_eol 
clr^eoe 

columu_s4dreei 
comma nd_cba rec t a r 
cursor addraaa 
Cureorjdown 
euraor_ho 
cursor Invisible 
cursor~laft 
cureo r jaem_s d draaa 
curaor_normal 
cureor_rlgbt 
euraor~tp_il 
euraor_up 
curaor_vl«lble 
delete cbersctsr 
delate_lloa 
dle_atatua_lloa 
dowD_half_llne 
ant eTjilt ^chares t 
anterjbllnk^mode 
an tar bold^mod* 
enter_ca mode 
enterjd*T*te_mode 
enter dla mode 



eaquence to 

cbt 

bsl 

cr 
>a car 

tbc 

clear 

al 

ed 

hpe 

CC 

cup 

cudl 

home 

ctvle 

cubl 

mreup 

coo re 

cufl 

11 

cuul 
cvvla 
dchl 
dll 
del 
hd 
mode aaaea 
blink 
bold 
sac up 
smdc 
dla 



Number of cola lo Una 

Taba Initially every I spaces 

Number of Unas on acreeo or page 

Lines of memory 

Dead chars left by saso or rmao 

Lowest epead with cr/ol padding 

Virtual terminal number 

Cola in statue line 

perfora aoee operation): 
Back tab 

audible algnal (bell) 

Carriage return 

Change to Unas #1 through #2 

Clear ell tab atopa 

Claer ecreeo 

Clear to cod of line 

Claer to end of display 

Set cursor col 

Term aettable cmd char lo prototype 

lalatlve cursor to row #1 col #2 

Down one Hoe 

borne cursor (If no cup) 

Make cursor Invisible 

Move cursor left one apace 

Meaory relative cursor addraaaleg 

Halts curaor appear normal 

Moo-destructive apace (cursor rlgbt) 

Last Una first col 

Upline (cursor up) 

Make curaor very visible 

Delete character 

Delete line 

Disable etatua line 

Half-line down (forward 1/2 lloefeed) 

Start alternate cheracter est 

Turn on blinking 

Turn on bold (extra bright) mode 

String to begin programs that uaa eup 

Delete mode (enter) 

Turn on half-bright mode 



enter loaart mode 


ilir 


s nee r_p rote cted^aode 


prot 


enter reverse aode 


rav 


aoter_aocure_aode 


lavla 


enter standoutjaede 


auo 


enter underlloe_aode 


•mil 


araae_chere 


ach 


exit alt charaet aode 


rmaca 


axlt_attTlbute_mDde 


agrO 


ex 1 t_cejaode 


rmcup 


exlt_delete_mode 


rade 


exl t 1 oaertjaode 


ralr 


e*lt standout mode 


rmao 


exit uoderUnejBode 


rrnil 


flaahjscraan 


flaah 


form_7eed 


ff 


from_atatua Una 


fil 


lolt_.strlng 


lal 


lnlt_2ctrlng 


la 2 


Inlt 3etring 


lal 


lnlt_flle 


If 


1 nas~t_c hs re c t a r 


lehl 


lnaart line 


111 


iaeertjp*ddlng 


IP 


key backspece 


kba 


keyjeatab 


kebc 


key cleer 


kclr 


key eteb 


kctab 


key de 


kdchl 


key_dl 


kdll 


keyjdowo 


kcudt 


key_ele 


krmlr 


keyjiol 


kal 


key eoa 


kad 


key^fO 


kfO 


key_f 10 


kflO 


key home 


khaaw 


key 1c 


ktchl 


key~U 


kill 


key_left 


kcubl 


keyjapage 


knp 


hay_ppage 


kpp 


kay right 


kcufl 


key_af 


kind 


key_sr 


krl 


key~stsb 


kite a 


kayjup 


kcuul 


keypsd_locsl 


rafcx 


keypad salt 


■ aki 


labelJTQ 


lfO 


i 

labaWIO 


If 10 


«ec«_oa 


a an 


■•[■'off 


rma 


o«wiro« 


oal 


pad_char 


pad 


pin dch 


dch 


para dalaea_llQa 


dl 


par«^dovti_curaor 


cud 


para Ich 


lch 


para_lodex 


Indn 


per« << _lnairc_lloa 


11 


parW"~lale_curior 


cub 


para rlfhc curaor 


cuf 


pana_j-indax 


rlo 


pan up_curaor 


cuu 


pk«y_ka7 


pfkay 


pkay_local 


pf loc 


pkay_xal e 


pfa 


prlac_aeraao 


•CO 


prcr off 


acft 


prtr^pa 


mei 


rapaac char 


rap 


raaat Tacrlnf 


ral 


raaae_2atrtnf 


ra2 


raaac_3acrlag 


r.3 


raaac~f 11a 


rf 


raaeora curaor 


tr 


row_addraaa 


*p* 


a ■«« curaor 


ac 


acroll forward 


lad 


acroll_ravaraa 


rl 


aat_actrlbutaa 


•I' 


aat~ tab 


bca 


aac window 


Villi 


tab 


bt 


to_aeotua_llna 


tal 


uodarllna_char 


uc 


up_balf lToa 


hu 



Insert mode (eater) 

Turn on protected mode 

Turn on revera« video mode 

Turn on blank mode (chore Invisible) 

Begin otand out aode 

Start underscore mode 

Eraae $1 characters 

End alternaca character aat 

Turn off all attributes 

String to end program* that uaa eup 

Bad delate aode 

End loaart aode 

amd etand out mode 

Bad underocore aode 

Vlalble bell 

Hardcopy terminal page-eject 

Beturo from etatua Una 

Taraloai laltlallsatloo etrlng 

Teralnal Initialization string 

Teralnal loitlalliatlon atrlog 

Name of file containing la 

loaart character 

Add new blank line 

tneert pad after character inserted 

Sent by backapaca key 

Sent by clear—sll-tsbs kay 

Sent by clear acreeo or eraae key 

Sent by clear-tab key 

Sent y delate character key 

Sent by delate Una key 

Seat by terminal dove arrow kay 

Sent by rnir or tmir in insert mode 

Sent by clasr-to-end-of-llne kay 

Sent by clear-to-end-of-acreen key 

Sent by fuoctlon key fO 

Seat by function key f LO 

Sent by home key 

Sent by las char/eater loa mode key 

Sent by insert Hoe 

Sent by tetmlnel left arrow key 

Sent by next -page key 

Sent by prevloge-page key 

Sent by terminal right arrow key 

Seot by seTOli-forwerd/down key 

Sent by ecroll~baekvord/up key 

Sent by aet-tab kay 

Sent by terminal up arrow key 

Exit keypad transmit aode 

Enter keypad transmit mode 

tmbel on function key fO If not fO 

Label on function key flO If not f 10 

Enter meta mode 

Exit aeta mode 

Xawllnc (like cr then If) 

Pad character 

Delate 11 charm 

Delete II lines 

Move curaor down fl llnea 

Ioaert II blank ehars 

Scroll forward II llnaa 

Add II new blank lines 

Move cursor left II spaces 

Move curaor right #1 spaces 

Scroll backward II llnea 

Moffa cursor up 9\ lines 

Prog funet kay II to Input atrlog #2 

Prog funct key II to exec string 12 

Prog funct key II to xmlt etrlng 12 

Print contenta of screen 

Turn off printer 

Turn, otj printer 

tepeat char ll 12 tlmea 

Baaec terminal 

Beset terminal 

Beset teralnal 

Name of file cootalnlog reaet atrlog 

Beatore curaor to poaltloo of laat ec 

Sat ebaolute row addreaa 

Save curaor position 

Scroll text up 

Scroll teit down 

Define video attributes 

Sat tab lo all rove current col 

Window lloas 11-12 Cols §3*0* 

Tab to next 8-apace hardware cab atop 

Poaltloo curaor to statue line col II 

Underscore one char and move paat 

Bslf-llna up (reverse 1/2 linefeed) 



in which #o represeots perammter o. 
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Cursor addressing and ocher strings requiring parameters 
are designated by parameterized strings with prlntf-llke 
sequences. For example, to set the cursor, cup Is 
specified assuming parameters row and column, each base 
zero. The parameter mechanism uses a stack and special 
codes to manipulate It. Typically a sequence will push 
one of the parameters onto the stack and eventually 
output It. These codes have the following 
Interpretations : 

ZZ output *t' 

Zc Zd Zs output pop() as In printf 

Zp 1 1-9 1 push nth parameter 

ZP(a-z] set variable [a-z] to pop() 

ZgEa-zj push variable (a-z] 

Z'c' push char constant c 

Z{nn} push Integer constant nn 

Z+ Z- Z* Z/ Zm Xf, l\ Z* Z- Z> Z< 

push(pop() op pop<)) 
Z! X" push(op pop()) 

Zl add 1 to first two parameters 
Z? expr Zt thenpart Ze elsepart Z; 

if-then-else (Ze elsepart optional) 



Following 
terminal: 



Is the termlnfo description for an adm-3a 



la|adm3a| 3a| lai adm3a, 
cr-"M, cudl-"J, nl-*J, bel-"G, 
am, cubI-*H, ba, cup-\E-Z+ Z+ , 
clear-*Z, cols?80, home-**, 
llnes#24, cufl-"L, cuul-*K, 

In which the first line provides alternative device 
names, the equal and pound symbols provide values for 
numeric and string entries, carets Introduce control 
characters, and the string entry starting with cup- 
indicates how to set the cursor on an adm-3a terminal 
(escape, -, (row + ' ') , (col + " ')). 

Termcap files are composed of groups of device 
descriptions, in symbolic format, without the termlnfo 
directory structure. 

Entries in termcap follow the same general format as 
entries in termlnfo, although the entry names are 
restricted to two characters. 

Following Is the termcap description for an adm-3a 
terminal: 

la|adm3a|3a|lal adm3a:\ 

: cr-*M :do-* J : nl-* J : bl-*G : \ 

:am:le-*H:bs:cm-\E-Z+ Z+ :\ 

:cl-*Z:co*80:ho-**:ll#24:\ 

:ma-*K"P:nd-~L:up-*K: 
The termlnfo file format la newer than the termcap file 
format and Is capable of more efficient use, since It 
does not require searching, scanning, and processing on 
each use, as does the termcap format. 

Operational models baaed on the termlnfo and termcap 
device descriptions are presented in the next chapter. 

C PROBLEM 

The C functions In the test program below compute the 
factorial function in both recursive and non-recursive 
manners. Note that float or double types could have 
been used (although carefully) In place of long. In this 
case, despite the requirement that the results be 
calculated exactly. The maximum value calculated 
correctly may be obtained from the output In comparison 
with a published table. 

In general, the programmer does not have the luxury of 
precalculated correct results, and should use float or 



double very carefully (or avoid their use entirely) when 
dealing with values which must be exact, such as in 
monetary calculations. For example, use longs to 
contain exact dollar amounts to the penny, then multiply 
or divide by 100 when inputting and outputtlng values 
for human use, rather than carry the floating-point 
values Internally. As an added bonus, the calculations 
will normally be performed much more rapidly In integer 
mode than in real mode. 

♦include <atdlo.h> 

long recfact(n) 

lnt n; 

( 

return((n < 2L) 7 1L : (recfact(n - 1) * n)); 
I 

long nrecfact(n) 

lnt n; 

i 

long f - 1L; 

while (n > 0) 
( 

f - f * n; 

— n; 
} 

return f; 
) 

maln( ) 

{ 

lot i; 

for (1 - D; 1 < 20; ++1) 

prlntf("Z3d ZI31d Z131dn", 
1, reef act (1) ,nrecfact(l)) ; 
pfllnltOt /* required for mccosh c only */ 



I 



For the next C problem, write a C program which will 
exactly generate and output the elements all of the 
elements of the Fibonacci sequence, with any given 
number of digits of precision. The Fibonacci sequence 
is defined for purposes here as follows: 

the first element has value zero, 

the second element haa value one, 

each element after the first two baa 

the value of the sum of the preceding 
two elements. 
Thus, the first few elements are 0, t, 1, 2, 3, 5, 8, 
13. Stop the calculation on the first value exceeding 
the number of digits of precision specified. Do not 
assume that this number of digits of precision is within 
the range of longs or doubles. 

EXAMPLE C PROGRAM 

Following is this month's example C program; it converts 
TSG word-processor-formatted files into STYLO format, 
although It does not convert all of the TSC commands nor 
any of the TSC registers. This conversion la made 
necessary because STYLO provides no direct meana of 
loading files Into its format. 
/* styfllt.c 

converts tac word processor format to atylo format 



tac wp 



atylo 



cr cr 


cr cr 






cr . 


cr , 






cr 


apace if not in 


.nf or 


.ce o 


cr 


cr if In .nf 






. ce n 


,ce n 






.fl 


Ju 
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,lo o 

.«0 

• P8 

,■1 n 

(n ♦ 1) cr 

,xx ,.. (aay be Incorrect acylo conmand) 



.In n 
.nf 

• PS 
,ai n 
.ap n 
.xx . , 

\\ 
\* 

\e 



/Include <(tdlo.h> 
/Include <ctype.h> 

■aln(argcargv) 
lnc argc; 
char **argv; 

{ 

FILE Mnput - acdln, 'output - atdout; 

char *p, atrlng(2S6], atrlngl(2S6] ; 
lnt c - 1, d - 0, 1 - 0, pc - '\n'j 
lnt ca - 0, nf - 0, ap - 0, xx - 0; 

putc(~\n~, atderr); 

If (argc > 1) 

{ 

If (1 (Input - fopen(»++argv. "r"))) 

( 

fputa ("can't open lnput\n", etderr); 
exit (1); 
) 
) 

If (argc > 2) 
( 

If (I (output - fopen(*++argv, "v"))) 
( 

fputa ("can't open output\n", atderr); 
exit (1); 
) 
) 
while ((c - getc(lnput)) I- EOF) 

•witch (c) 

( 

caae "W: 

pc - 'W; 

If ((c - getc(laput)) — EOF) 

break; 
If (c — 'Vn') 

putcCW. output); 
alae 
( 

putc(l ■ c, output); 
break; 

} 
caae '\a': 

If (1 - ((pc — -\n') || of || ce)) 

{ 

putcd - *\n', output); 
If (ce) 
— ce; 

» 
alae 

( 

pc - c; 

if (((c - getc(lnput)) ~ EOF) || 
(c -- '\n') || (c — '.')) 
putcd - '\n", output); 
alae 

putcd - " ", output); 
If (c I- EOF) 
i 

ungetc(c, input); 
c - pc; 
J 
J 
break; 



If (pc 1- '\n') 




( 


putcd - c, output); 


break; 


> 


If (fgeta(atrlng. 256, Input)) 


{ 


for (pc - xx - ap - ce - 0, p ■ string; 


(c - «p); ++p) 


( 


d - tolower(*(p ♦ 1)); 


awltch (c) 


( 


caae '0' 




caae *1* 




caae '2' 




caae '3- 




caee **' 




caee "5' 




caae "6" 




caae '7' 




caae *8' 




caae '9* 




xx +- (xx « 10) + (c - '0'); 


break; 


caae *C* : 


caae "c"; 


if C(d — 'e') && (Ipc)) 


( 


++pc; 


+*«e; 


} 


break; 


case *F~: 


case 'f: 


If ((d — '1') && (!pc)) 


< 


♦♦pc; 


nf - 0; 


«p +• cr - "f>; 


*(P ♦ 1) ♦- ("u* - *t')i 


) 


break; 


caae '»': 


caae 'n*: 


If ((d — 'f') && (Ipc)) 


( 


++pc; 


nf - *(p ♦ 1) ♦. C"J* - ***): 


J 


break; 


caae *S": 


case 'a': 


If ((d — 'p') && (Ipc)) 


1 


++pc; 


♦+ap; 


> 


break; 


) 


) 


If (Ixx) 


XX - Ij 


If (ca) 


ca - ++XX; 


If («P) 


while (xx— } 


putc(*\n*, output); 


alae 


{ 


putcC", output); 


fpute(etrlag, output); 


} 


pc ■ 1 ■ '\n'; 


} 


c - '\n"; 


break; 
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default: 

putc(l - c, output); 

) 

pc - c; 



) 

If (Input I- stdln) 



& 



fcloae(lnput); 
If (output I- atdout} 

fcloae(output) ; 
exit (0); 



OS-9 
User Notes 



Peter Dibble 

19 Fountain Street 

Rochester, NY 14620 

A Top-Level Menu 



1 uae my computer for many things and I have a 
rata' neat of directories on my disk to prove It. Some 
of the things I work on most often are dowo six or more 
levels In the directory tree. I get tired of typing 
commands like: 

0S9: end /hO/source/tools/txt/doc Just to get to the 
directory where the documentation I'm working on Is 
stored. 

Last summer I spent most of my time working on one 
big software project. I moved around in one small 
branch of my directory structure. After a few weeks 1 
got tired of typing a long CHD command to get to that 
branch every time 1 logged on. I realized that I could 
put the directory into the Password file as my logon 
directory. It worked fine, saving me some tine and lots 
of annoyance over the summer. 

During the school year my activities are not so 
limited. I log onto the department's computers; I write 
these columns; I work on things that may turn into 
books; I develop software; I do accounting, write 
letters, and never seem to use the same directories two 
days In a row. On top of that I have a wife who 
sometimes shares my computer. She certainly doesn't 
know where all the treasure Is burled. 

Since moving to the correct directory and invoking 
the right program Is repetitive detail work, It ia a 
suitable task for a computer (not a human). I wrote a 
program. I call It Menu because it lets me present the 
user (me usually) with a menu that allows him to make 
selections limited only by my creativity when I write 
the menu control file. Menu will stay around under the 
user like a personal aysgo module. 

The menu program Is simple. Menu doesn't know 
anything about formatting screens except that a carriage 
return moves the cursor to a new line. It doesn't know 
anything about OS-9 commands except that the "system" 
function invokes them. 



1 got tired of typing a long 


CHD command to get to that 


branch euery time 1 logged on. 


1 realized that 1 could put the 


directory into the password 


file as my logon directory.... 


It worked fine.... 



Menu Is controlled by a file. The first part of 
the control file Is displayed on the screen. I put the 
menu, a prompt, and lots of screen formatting codes in 
that part of my control files. The display part of the 
menu Is terminated by a line containing Just three 
dollars signs, $$$. The second part of the control file 
contains commands. Each line starts with a single 
character selector which is followed by a shell command. 
If the user types the Selector for a line. Menu will 
run the shell command then go back and display the menu 
again. 

It is Important that Menu redisplays the menu and 
waits for another selection after a command completes, 
It means that Menu stays around to help you when you 
finish your task. (It also means that Menu ties up some 
memory.) 

One selector character Is special. If there Is a 
command line for the character "q". Menu will exit when 
it completes that command. 



The command llnea in the control file are limited 
to eighty characters each. This is a limitation of the 
system function, but it Isn't an important problem. If 
you want a menu selection to do something too 
complicated for a short command line, invoke shell on a 
file with a shell script In it. If you really want to 
get fancy, menu will work as a hierarchical menu system. 
Each selection that points to another menu gets a 
command line like: 
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KMP Knuth Morris Pratt 
algorithm really shines.... 

Boyer Moore algorithm 
gets a little carried away.... 

fl simpler algorithm that 
works almost as well as 
Boyer Moore and has less 
overhead is the mismatched 
character algorithm.... 



oenu Special .Menu. c7 When you quit from 
pop back to Che msou chat called lc. 



»nu you 



My current nenu files are ao full of ANSI control 
sequences for changing attributes and drawing boxes chac 
Chey don't sake eaay reading, but here's any early 
example Chac reads pretty well. 
-U2J 



'llWtln Heiiu'llOi 



-U45;8 P 
-((7-c-IIO. 
-[[7«l-([0« 
-[[7mp-[[0m 
addresses 

-[[7mr'lt0m 
-([7«s-((0« 
-II7«q-I(0« 



Enter CexC 
Write letters 
Lookup phone 



numbers and 



Logon Co a reaote system 

Staple logon (nochlng special) 
Quit 



Make a selection: $SS Cchd /hO/CATH/TEXT; da 
; * acarc dynascar lchd /hO/CATH/ LETTERS; ds ; * stare 
dynaatar pchd /hO/PEOPLE ; * don't atart anything buC a 
ahcll rdc ; * run ay ceralnal program achd /hO; qecho; 
echo Logging off 

Noclce Chac che selections are C, 1, p, r, a, and 
q. Any other selection will draw an error message and 
another chance. The lengch of clae for which Che error 
message will bs displayed is determined by Che 
SLEEPTICKS cooacanc In Che prograa. Ic la aec Co ahow 
for a nice lncerval on ay Level Two aystea. On a Level 
One ayatea (with lea alower Clck race) you should sake 
chac conacanc smaller, or you'll aee che error message 
undl you are very alck of lc. 

A good place co run Che Menu prograa froa la che 
Password (or startup) file. In Che password file, use 
Menu •» Che Initial prograa. 

I have been surprised by Menu. lc doea a lot Co 

make OS-9 eaaler Co uae. I expecced lc Co be a 

shorthand way for me co gee around when I logon. I 

chink lc may actually prove co be an eaay "friendly 
fronc end" for OS-9. 



There are aome changea you alghc wane co make Co 
Menu. The aaln onea are Co aec chlnga up so Menu will 
Ignore Interrupts and EOF. I didn't do that becauae I 
fool with the prograa a lot and wane co be able eo kill 
IC easily. 



Faac C Functions 
Continued 



A few months ago I presented assembly language 
versions of Che baalc funcclona In Mlcroware C's string 
handling library. I argued that che aoac effective uae 
of aaseably language waa In libraries and operating 
aysteaa. I left flndstr and flndnatr out of che sec of 
functions becauae they are hard to do right. Mlcroware 
seems to agree with me; they note In Che C manual chac 
che algorithm they uaed la not the most efficient. The 
standard (not eaay) string matching algorithms are 
called the Knuth Morris Pratt Algorithm and the Boyer 
Moore Algorithm. An even flashier algorithm waa 
Invented by one of my professors, Joel Selferaa. The 
problem with the fancy algorithms la that they have a 
high overhead. For simple Jobs they aren't worth using. 

Lets say we're looking for a pattern In a string 
called data. The simple way to match strings Is to take 
Che pattern and compare It agalnat aubatrlnga of data 
until you find a aacch or reach Che end of data. I'd 
guesa that Mlcroware C'a library flndstr function works 
that way. If the pattern la ahorc , unrepeclclve, or 
unlike che data atrlng thla la not a bad way to do It. 
We run Into trouble when these conditions aren't met. 

Take the following (exaggerated) example: The 
pattern la "abababsbb" and the data atrlng la 

"abababab ababbabab". You can aee that the pattern 

will match the data string at the fifth to laat position 
It will try. Each time It comparea the pattern to a 
aubatrlng of the data atrlng the almple method will 
compare "abababab" to "abababab" before It finds "b" not 
equal to "a". 

The trick In the Knuth Morris Pratt (KMP) algorithm 
Is that In tbla example It would note that If the final 
"b" meets an "a" we reject ac che position we were 
checking, move over two and reatart the matching 
operation looking for Che aecond Co laac "b" In Che 
pactern. The "abababa" that we've already looked at 
doesn't have to be checked again. Since thla algorithm 
never baa to back up and check a character from the data 
atrlng again It la particularly nice for doing thlnga 
like searching a file for a long atrlng. 

The KMP algorithm really ahlnea when the pattern la 
long and repetitive. The repetition In the pattern 
doean't have to be complicated. A pattern with a 
hundred blanka ac che beginning la a fine example of a 
repetitive pattern. If the beginning of the pattern 
doean't match often, the algorithm doesn't get a chance 
to uae lta power often. Since moat aearchea aren't for 
long repetitive strings KMP searching lan't generally 
the beet way to search. Still, we can't write KMP off 
that easily. If we get fancy and permit things like 
wild cards In the pattern, KMP-type algorithms need to 
be looked at again. 

The Boyer Moore Algorithm la baaed on the Idea that 
looking at the pattern backwards will often let you Jump 
through the data string quickly. If the pattern waa 
"abb" and the data waa "abebebababba" comparing the 
third byte of the pattern with the third byte of the 
data would ahow that the pattern doean't Batch at 
position one. In fact, since "c" doean't appear 
anywhere In the pattern, we can rule out matcrea at 
positions one, two, and three. 

The Boyer Moore algorithm geta a little carried 
away when It la preprocessing the pattern. A simpler 
algorithm that worka almost as well aa Boyer Moore but 
has leaa overhead la the alamatched character algorithm. 
I have Included C code for It with thla column. I 
would have given you aaaembly language Instead, but the 
algorithm la hardly easy to aee In C. In assembler It 
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would be almost Impenetrable (also long). Try 
converting It to aaaeably language youraelf or petition 
Don W. for It. I have suggested to tain that ay 
aaaeably language functions night make a good disk for 
hla to aell. 

The alamatched character algorithm atarta comparing 
at the right aide of the pattern and the apot In the 
data string where the pattern would end. It compares 
toward the left until It reaches the beginning of the 
pattern (Match! ) or a mismatch. When It geta to a 
mlaaatch It looka at the character after where It 
atarted In the dmta string. It chooaea a new atartlng 
point In the data string which would let that character 
fit Into the pattern. (If It could fit In several apota 
It plcka the flrat apot. If It doesn't appear In 
pattern It Jumps by the length of the pattern plua one.) 
The algorithm loopa until It flnda a match or runs out 
of data string. 

If the data string la short the simple algorithm la 
fasteat becauae of the aetup time for the other methode. 
The mismatched character algorithm la good when the 
data string haa lota of different characters In It and 
the pattern la more than two or three charactera long. 



I 
2 
3 
I 
5 
6 
1 
8 
1 
It 
11 
12 
13 
II 
15 
II 
17 
IS 
It 
21 
21 
22 

n 

21 
23 
26 
27 
28 
2? 
31 
31 
32 
33 
34 
13 
» 
37 
rnolj 
31 
Jt 
II 
II 
42 
43 
44 
43 
16 
47 
4t 
It 



•include (stdio.h) 
•include <sgstit.b) 

■define TUE I 
Idilini fm.SE I 
•define UKSIZE 133 
•define SLEEFIICKS IN 
Idrtini EOFlaS 'i»t\n* 
Idilint ESCAK.rOK '•' 

static direct char il»iuFa»HVHl/'Startup.ltfnu'; 

italic direct char cj 

Italic direct FILE affile; 

static struct sghuf Options, OldOptions; 

aemlaroc, argrl 
lit arq;; 
char tiartvl 
( 

char line! DUES! IEI; 

re; ister char iptr; 

tltbufl.tdin, MULL)) 

iHar«e ) I) 

KinuFNase • arQvtll; 
f etstat It, I, llptioni); 
_atriii<IOIdOptioris, (Options, uteof Options); 
Dptions.sg pause ■ I; 
/1 Mart at could am «i th 

sg.oolch, 11). pub, 19 khicl, aid tg.koacb 

i( « «int m to prevent anyone froe si ippina 

oat ot Iht inu by intake 
•/ 
stitltlllKEII 

iflHfile • tcpnlNauFKiM, VI) == 111)1 
fpriaUUtderr, •Bene lilt I» non't open. 

•<itll)| 



Error ld\n*, *r 



> 
*illIT«H 

latitat (I, I, Mptions); 
•fei)e<fgott<>iee, IIICSI1E, Ifile) !■ WUH 
iHstrcaollifie, EiOfUWl >> I) 

braiij 
/• clear the CD off the line 1/ 
forlptr ■ line; iptr It liptr •■ \n'l; »fplr)| 
ibtr ■ 'M'| 
printf l'\nli' f line); 
} 



31 C • geUhtrD; 

51 ■hileffoettlliae, 1IKSIZE, IFilel ! - MULL) 

32 ifliliae ■■ cM 
S3 fclose(ffileJ) 

M latitat (I, I, tOldOptiont); 

33 lysteellinHlli 
5b treat; 

57 J 

38 if (c •> ESCAPE _CSK>( /a euapr >/ 

5V eiltlt); 

it 9 

61 ilk !• time) I 

62 printl !*\nDptien tc not dtlintd. Try Aoain\n', c); 

63 IsleeplSLEEPUDtS); 

64 rMind(BFi)e); 

65 (ontinue; /• redisplay '/ 
«* I 

17 break; It back to reopen the »en« file 1/ 

66 ) It end snilt 1RUE 1/ 
it > It tnd outtr ihilt TStlE 1/ 
71 exit III; 

71 ) 



I (include <itdio.h> 
2 

3 fsinitskiplpat, skip] 

4 char <pat| 

5 int stipt2Si)| 

6 ( 

7 int i,jj 

8 register int »iptr; 



i • tlrlenlpat); 

lortM, iptr • i»ip;j<23»;»0) 

iiatraa ■ i| 
foHi--|ipet;"pat, 1— I 

itiplspetl • i; 
rotors; 



t 

II 
II 
12 
13 
14 
13 
la } 
17 

It tinditrlpoi, itr, pal) 
If int poi; 

char aitr, ipat; 
( 

int leaoth, slenoth, 
int strptr, patptr; 
int skip! 2561; 



last; 



fsinitskiplpat, tkipl; 
itr ■ itr • Ipoi • III 
length ■ str Jenlpat) | 
last > length - I; 
ilength > strlenlstr); 
•trptr ■ patptr « length 



/* Initialize the itip array */ 
/* Skip to offset poi in itr </ 



dol 



if litrCitrptr) » JetipitpfrlH 

It eatched a character tl 

strptr--; 

patptr--; 
leliel 

It aiiaatch >/ 

strptr «• length - patptr ♦ I; /spoilt strptr one to tie 

right ot shere it sta/t for 
tbis piss •/ 

patptr > last; /• Hoc back to the right end of pat </ 

rfllklplstrtltrptrl) > length - patptr ♦ I) 

strptr ti ikiplstrtstrolrll - ll»ngth-patptr»ll; 
) 
) «hilt(lpatatr>'ll U (strplrdslengthl); 
iflpatptr < 8) 

return strptr*?; 
else 

return t) 
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QPL 



Jim !«e, CPU - Compiler Products Unlimited, lac. 



QPL - A Bold Seep Co Very High Level Language 

This la che flrac Id a aerlea of articles abouc a 
Vary High Level Language named QPL. 1c la available 
froa Compiler Produces Unlimited for systems running 
FLEX. 

Because QPL is a very-high-level language, lc la 
very dlffereoc from aoac popular languages in use on 
FLEX ays teas. Other very-high-level languages which you 
may have heard of are Llap, Sooboll, Easycrleve, and 
Prolog. Learning a new language Involves some effort; 
however che payoff la Che ability Co produce compleced 
programs much faster chao in ocher languages. 

Two basic differences beCween QPL and Pascal-cype 
languages are convenience and power. Convenience la a 
relative measure of bow easy 1C la Co do something in a 
language. For example, ooc being able Co address an 
array wlch a real number is inconvenient. 

Language power la being able to do a lot wlch few 
statements. For example, being able to copy array DAYS 
to array APPOINTMENTS by an asslgnmenc scaceaenc 
APPOINTMENTS - DAYS is more powerful Chan having Co 
wrlta a loop to do ic. 

The effecC of having a powerful, coovenlenc 
language la chree fold; programs gee wrlccen much 
faacer, and Che user perceived quality of the programs 
la higher, becauae better toola produce better results. 
While Che Cools / result-quality ia difficult to 
quantify, an example can illustrate it; paint two car 
fenders, the first one wlch a Q-tlp and a can of paint, 
and aecond one wlch a apray gun. The chlrd effecc la 
Chac a more powerful Cool glvea you che confidence Co do 
more complex programs. 

Power and convenience are obcaloed in QPL by 
generality and simplicity. An example of generality la 
ChaC in QPL, an array may concaln a mixture of baalc 
daca Cypea, and lc may be addreaaed by real numbers 
(real numbera are Che only kind in QPL). Generality 
promotes aoluclooa which have Che aaae 'shape' aa che 
problem. For example, vrlCe a program which makes a 
Use of words uaed in cexC flic, and records Che number 
of times each la used. In QPL the program can contain a 
two-dimension array which baa che words found In che 
file, and che number of clmea each word was found. To 
do Chls in ocher languages would require Cwo arraya, one 
for che words, and anocher for che number of clmea used. 

Becauae QPL arraya can concaln mixed daCa cypea, 
Chey can do che Job of Pascal records. In face, alnce a 
QPL array element can concaln any Cype of daca of any 
alxe, lc can do a bigger Job Chan recorda. Thle 
demons craCea bow generality in QPL feaCurea allows 
simplicity in Che language. 

QPL DESCRIBED: 

QPL consist* of cwo major pares; a relatively 
conventional group of ablllclea for doing arithmetic, 
making comparlaona, and conditional branching and 
looping. The second major part ia a group of abilities 



for cresting patcerns and doing pattern macchlng. The 
conventional ablllclea are provided in slightly 
uncooventlonsl wsys, which produces some of the power 
sdvantage. The real power in the language cornea in the 
pattern-proceaalng functions. 

The first group of abilities is compatible with 
'linear' thought proceaeea and ia the most coovenclonal 
pare of QPL. We will discuss chls group of feseures 
first. 

INPUT and OUTPUT: 

QPL haa chree pre-defined varlablea: INPUT, OUTPUT, 
sod NULL. The variable OUTPUT la uaed Co cause 
aomeehing co be printed on che console. Thua Che 
statement?: 

OUTPUT - "Hello world" 
'Hello world' on your 



terminal. The 



will print 
■statement 

OUTPUT - 123.5 + 3.1 
will print 126.6 on your terminal. Thua we aee that 
anything assigned to OUTPUT will be printed out. OUTPUT 
can alao be used like any other variable. For instance, 

OUTPUT - OUTPUT ♦ 1 
will print 127.6 if executed after the previous 
statement. 



gee 



The variable INPUT ia a signal co che compiler Co 
a acrlng from che cermlnal keyboard. The ataCemenc 



SENTENCE - INPUT 
will cauae the compiler to get a line of text 
keyboard (terminated by carriage return). 



from the 



There la no limit to the alze of atrlng which can 
be aaalgned to the variable SENTENCE (or to any other 
variable), and there la no limit to the alxe of atrlng 
that INPUT can get. Thla 'no limits' approach ie 
ceocral co QPL and ia one of che reasons for high 
producclvlcy. There is seldom a need to coococc program 
Crlcka Co bypass limits Imposed by Che language. 

There ia one llmlc no language can escape, Cha alze 
of available memory, and chla llmlca Che alze of all 
daca lceos. 

NULL la Juat a zero-length atrlng, which ia often a 
handy initial value to assign to varlablea. It ia alao 
tha default value of all variables. NULL cso be used in 
string operations, but IC cannoc be used in number 
operaelona (produces error message). 
USER VARIABLES: 

User varlablea require no explicit declaracloo, 
except for arraya which muat be named and sized. Unlike 
ocher lsnguagea which requlrea arraya co be declared 
wlch fixed sizes, QPL arraya may have variable alze, 
decei-alned aC run time. All varlablea, including array 
elements, csn hold any value auch aa a number, atrlng, 
or a pattern, of any alze. 

NUMBERS: 

Numbera are scrlngs which have only numeric 
characcera, including decimal point. Numbera are 
accepted in INPUT atatementa, or bard coded in the 
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program, In either of two formats: decimal and 
exponential. Example decimal numbers are 12, 99.67, 
1234567800032030301202130.0272387. Mote that numbers 
may have a large number of significant digits. All 
digits are processed by the arithmetic routines, 
producing EXACT RESULTS. There is no rounding or 
truncation. Exponential numbers consist of a number 
followed by 'E', followed by the power of 10 exponent. 
An example exponential number is 123E3450. Numbers 
have a range from 10 exponent 32000 to 10 exponent 
-32000. In exponential format numbers, only the digits 
to the left of the 'E' are significant in arithmetic 
functions. This fact allows programmer control of 
number precision independent of number value. Two 
numbers with the same value but different precision are 
50E4 and 500000. The arithmetic functions process 50E4 
much more quickly than 500000, and produce results with 
lower precision. 

ARITHMETIC: 



QPL arithmetic look 
calculation of the we 
example below shows : 

ALUMINUM 
Mote that there is a 
division operator '/' 
clarity, it la required 
The two-operand arithmet 
they have the conven 
single-operand arithmet 
must not have a space be 
example of negation is a 



s fairly conventional, as the 
lght of an aluminum atom in the 

- 26.97 / 6.023E23 
apace on either aide of the 
The apace is not Just for 
for all two-operand operators, 
ic operators are /, *, +, -, and 
tional meanings. The only 
lc operator is negation, and it 
tween it and its operand. An 
s follows: 
SAM - -SAM 



Numbers can be output (printed) in two formats, 
decimal and exponential. Selection of the format is 
done by setting the EXPO flag through a call to the 
function EXPO. 

EXP0(1) — seta for exponential output 
EXPO(O) — seta for decimal output 
NUMBER PRECISION: 

Because the arithmetic ayatem produces exact 
results, it is possible to create numbers which are 
unwieldy. An example of thia ia as follows: 

SAM - 1E500 + 1 
This aaaigns to SAM the number 1000000(499 
zeros )00000001. Even if we set the EXF0(1) switch, the 
number will be printed with all 499 zeros, and the final 
1, becauae thia is the only way to express it. In other 
words, EXP0(1) does not help for numbers which have a 
large number of algnlgf leant digits. We can reduce the 
precision of a number by uaing the APPROX function: 

APPR0X(SAM,2) 
This will truncate the precision of SAM to about 2 
digits, allowing it to be printed as 100E498, if EXP0(1) 
haa been aet. 

Thua QPL'a arithmetic system can produce exact 
results without rounding errors for business 
applications. It can also produce very high-precision 
results for scientific work, with truncation explicitly 
controlled by the programmer. 

COMPARISON: 

Comparison in QPL ia done by comparison functions 
with names like LE, CT, LT. There are 8 total (2 
lexical) and are uaed as follows: 

IS- LT(C0UNT,3) 
In the statement above, the function LT compares the 
value of COUNT with 3. If COUNT la lesa than 3, the 
function LT returns a value of 1 , which gets assigned to 
IS. Otherwise, it returns 0. LT also sets a global 
success / fall flag which can be uaed to cauae 
branching. While theae comparison functlona may aeem 
aimilar to the compariaon operators .LE., .LT., etc of 
Fortran, the difference ia that in Fortran .LE. is an 



operator, and does not return a value, but seta an 
internal pass / fall flag, as part of an IF atatement. 
BRANCHING: 

To do branching and looping, QPL uses conditional 
and unconditional COTO statements which come in three 
types: 

:S(HERE) — this is a success goto to 'HERE' 
:F(THERE) — this is a fall goto to 'THERE' 
:(Y0NDER) — unconditional goto to 'YONDER' 
In addition, there are two combined forma which look 
like thia 

:S(HERE)F(THER£) — if aucceaa goto HERE, else goto 

THERE 
:F( THESE) S(HERE) 

LABELS: 

Labels are the places to which goto statements 
tranafer control. They must begin in the first column 
and must begin with A-Z. 

COMPARISON AND BRANCH: 

A complete compariaon and branch statement looks 
like this 

LT(C0UNT,3) :S(THERE) 
If the value of COUNT is leas than 3, the program will 
Jump (goto) the label 'THERE'. Note that we did not uae 
the returned value from LT in the above example. 

The above example can be modified by the Inclusion 
of the name indirection operator '$', so that execution 
will goto whatever THERE contalna. In thia caae, the 
code would look like 

LT(C0UNT,3) :S($THERE) 
A uae for this line of code would be to have a program 
read in a label to goto from a text file. This 
technique can aave significant amounts of code which 
would be required aa 'case' statementa in other 
languages. If the goto label does not exist, the 
program aborts with an error message, it does not Jump 
into the 'garbage can'. 

The fact that comparison functions return 1 or 
can be uaed to perform complex logic in little code. 
For example, we can teat to see if P is not 1, 3, 5, 7, 
or 8 by the following code: 

NO - NE(P.l) + NE(P,3) + NE(P,5) + NE(P,7) + NE(P,8) 

If P aatlsfys all 5 conditions, the value of NO will be 
5. 

INDIRECTION: 

The name-indirection operator is the dollar algn 

'$'. It is written without any apace between it and ita 

operand. The function of indirection ia to get the 

value of Its operand. For example, in the program below 

SAM - 123 

BOB - "SAM" 

OUTPUT ■ BOB 

OUTPUT - $B0B 

line 3 will print SAM, because QPL dereferences the 

right aide by one level Juat aa almoat all languages do. 

Line 4 will print 123, becauae the indirection operator 

forces an extra level of dereferencing (dereferencing « 

value replacement). Indirection Is useful for chaining 

together related data. There is no limit on the level 

of indirection, except that it must be valid, or an 

error meaaage is produced. 

ARRAYS: 

QPL arrays are different from arrays in moat 
languagea. Besides the 'hold anything' ability, QPL 
arrays are created at run time and their size can be 
determined at run time. You can have a QPL program read 
FLEX Memend, and size arrays baaed on apace available. 
A further advantage of QPL arrays haa to do with the 
fact that like all data items in QPL, arrays are 
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allocated apace aa needed. What thla neana la Chat a 
large array can be declared without taking up a lot of 
aeoory apace. Only when data la written Into the array 
will apace be allocated. QPL arrays do another apace 
aavlng trick when array elemeata are aaalgned the aane 
value. The trick la to only Install one copy of the 
value In aeoory, and aet polntera to that value In 
duplicate entrya. 

Aa nentloned earlier, QPL arrays can do the Job of 
named recorda. In named-record acceaa, field nanea are 
used to help program readability. We can acceaa QPL 
array eleaenta by name also, by defining nsnes having 
uuacric values. An exsmple la shown below: 
ARHAi(CALENDAa, 12 ,31) 
JAN - 
FES - 1 
HAft • 2 
CAJLENDAH<FEB,12> - "Llncola'a birthday" 

STRING CONCATENATION: 

The concatenation operator la the ampersand '&'. 

It la a two-operand operator, ao It auat have a apace 

on either aide. To concatenate a atrlng and a nuaber we 
would write 

RESULT - NAME a ACE 



Assuming that ACE was a number, It will be converted to 
a string snd sppended to NAME, snd the resulting name 
sod sge string aaalgned to RESULT. 

Numbers can also be concatenated to form new 
numbers. For exsmple 

DOZEN - 12 
OUTPUT - (DOZEN & DOZEN) + 5 
will print 1217. 

Concatenation la also used la forming very powerful 
patterns, sad this will be discussed In the next 
Installment. 

This first article gives you s brief suaoary of the 
flrat 5 chapters of the QPL language manual. It covers 
those QPL festures which sre similar to other high-level 
languages. Even In these basic features, QPL provldea 
extra power, In waya which are eaay to apply. 

The next article will cover pattern proceaalng, 
which consists of psttern generstlon by use of 
alternation and concatenation operators, snd the use of 
speclsl pattern*. These festures sre almllsr to psttern 
matching functions found In the Snobol4 language; 
however tbey have added power and are much easier to 
use. 
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a, Blflb parforaanoa proe*aaor ayataa* 4«mVin4j a vary blqb p*rforavu\c* 
cantral procaaaor a» P*rt of lea d*»l<jn. Th* &•• HC4IC20 32-blt 
BLlcr«proc*aaor fro* Motorola la »ucft ■ d*vle*. Thia artlol* Mill 
dlacuaa tb* Halo fa»tur» a of tbii n*v idvwc*4 ■Icroprocaaaor tod 
bow a ayat*a> la 4* alga ad ealnf It. Ham lotarfac* to ifeastaotry mod 
p*ripb*rala li daacrlb^d along with raal-tlsa auppote via interrupt*. 
Tho ooflooptp diocuaiad in tbon intagratad to produce * daalgn foe a 

typical mlniamiat lyatatt eonalatlog of eantral procaaaor, ry and 

mornm feaalc I/O. 

MCMO20 r«Attiroa 



Tb* MC4I020 la tb* latoat mwmtmi of tba HIIOOO f ual ly of pro*aa*aro 
and P*rif**r*la. Tba daaign of tba baalo 41000 pxoo»aaor which vaa 
latrc4uc*»d lb 1*7> baa b**o oraitly *n2uLac*d and *xt*nd*d to pro Asm 
th*> new HCi«020, which li tba flrat tru* 32-blt aUoroprocooaor oa tba 
•tarfcat. Tba o*w MCM020 32-blt procaaaor la ob; act cod* caopatlbl* 
with all of tba a«r liar praeaaaora lo tba H4IOO0 f ami ly and oontaloa 
■uy o** additional f*atur*a oblcb graatly anbanc* tba avarall p*r- 
focaaUMaa of tb* procaaaor. Tba f**tar*o aval labia to unri of tb* 
now HC 41020 procaaaor oonoiat of tba following! • 



a) Virtual Maahory / Haebloa support 

b) Ilxtavafl 32-blt 0*n*ral Pcxpo-a Data and addraai JUglatara 
e) Two 32-blt 0up*rviaor Stack PoiAtari 

d> 32-blt Progru COUPtar 

o> riva »p*cial rurptfaa Control K*glot*ra 

ft 4 Olgabyta llnaar dlract addraaalng rang* 

9) l» Saalc Xddraoaino; Modaa 
b) Maanry Mapp*4 l/O 

1) Coprocsjaaor intarfaa* 

;il ■lojb F*rfoc**anc* On-chip in at ret loo Cacba 

k) Op*ratlona on 0*v*o dlff*r*ot data typwa 

1) Conplota aopport for a Sanaral IMrpo** Coprocaaaor lntarfao* 

Am tnown la Jig 1. tba uaar l*v*l programming atcd*l for tba MCM020 
la Identical to that of tb* otb*r H4I000 f aaU ly procaaaora and eooalata 
of •>< 32-blt g*o*ral euipeaa r»>*l*e*r*, a 32-bit progru cgvnear. a 
It-bit atatui raqitutr and « 32-blt uaar ataelt polotar ragiatar. 
Flo; 2 abowa tba additional faaturaa avallabla to progtatu ruiuilog 1a 
tb* flupairvlaor lavol. Tbli includaa a 32-blt Vaetor baaa> Kaglatar, 
vblcb allowa tb* procaaaor to bav* Ita lit byt# victor tafal* rolocatad 
aoyvtvara wlthlA tb* 4 Glojabyta llA*ax addzaai apae** Two altaroata 
fuoetloo raqlatara to allow oup*rrlaor coda to aec*»ia any data apac*. 
T«<* 32-bit r*9latan to control tb* oparatlao of an on-cblp each*. 
Finally, two aaparat* 32-blt auparvlaor ataclt polntara to allow tb* 
■•paratlon of latarrupt mod taak r*Xat*d axo*ptioo cooBUtlona. 



In tar facing to 



ory davicaja and paclptaral* la a a lap la uu«r mb 
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th* MC68020 Ueiun tbe proctitor is designed to u*e * technique known 
a* 0yn*mlc But Sizing. This concept allow* th* MC68020 to use either 
an 8 bit, 16 bit or 32 bit d*ta bus to interface to Maury and 
peripheral devices. The processor can dynamically change tha size of 
lta interface data bus on every bua cycle to handle tha different 
aizad interface porta. Tha Interface circuitry designed into tha 
MC68020 to cop* with tha dynamic gus sizing alao allows tha processor 
to read operanda from any byte boundary in th* addressing rang* of tha 
pCOMiisr. tbla faatura, known aa Operand Misalignment, mesne that tha 
MC61020 processor will automatically generate tha appropriate nutb*r 
of bua cycles to pfrfon an operand transfer. 7ha number of bua 
cyclaa generated depend* on bow tha opatand la aligned in memory and 
Alao on tba aiza of tha interfsca port'* data bus . 

0-n* of th* now Uiturn on th* MC6602Q vhich increase* th* patfonunn 
compared to tha MC68000 la th* addition of an on-cblp cacb* fllfiacy ■ 
Thia la a block of vary faat cm aery which ia Lffpl*mntad on th* 
•am* ailicon aa tba procaaaor and la ua*d to temporarily ator* all 
tba instruction word* prefetched by th* procaaaor. Tbla man* that 
whan th* ptocaiaor execute* a looping branch Instruction, it will 
probably than find that all of tba subsequent inatiuct lona ara atorad 
in tba on-chip each*. 7he MC68020 can tharfor* execute directly from 
tha cache at a faster rat* than if it bad to refetcb all th* instruction 

wordi fron external /pernor/. 

All of tba above f*atur*a and concepts have h**n deecribed in grest 
detail by KacCr*gor *t al < 1) and tberfore thia artlcl* will not 
attempt to r*-lt*rat* tbla Information. instead It will concentrate 
on th* application of tba MC68020 la a tyitfa configuration. 

Design Conaiderat lona 

A* already diaru ■■•*!, the MC68020 la a vary high performance mlero- 
pro**aaor which baa 4 to S t Jmea tha povar of an MC68000. To achl*v* 
th* nvaxliTtsiffl performance from th* MC68020, car* uit b* ua*d when designing 
m complete system, po that all bua cyclaa ac* performed in minimum 
tin*. Th* MC68020 ia deaigrved to perform a minimum 3 clocX bu* 
r*ad or writ* eye la and tharfor* tha memory aecceea tin* should b* 
conald*c*d in tba attempt to daalgn tba iyit«a for zero wait state 
operation. Conaldarlng tha timing figures given In tha MC68020 
Uaer'a Manual (2) it can b* aaan that for worat case Using a 16.67 Hhi 
clock signal , th*r* la spprox 90na fron whan tha addraaa atroba la 
aaaart*d by th* procaaaor to whan data will be latched Internally by 
th* procaaaor. Allowing approximately 20 na for addraaa decode tin**, 
there an 7Q n* left for amaory iccaii Claw- Thia lnplle* that a i*r* 
Wait State ayatan cunning At L6.*7 Kni Can be desired with memory 
device* having an icctn tina Of 70 ns Of better . Memory device* 
with slightly longer icctia time* could alao be u*a4 by employing 
faster logic in tba addraaa decode eyat*m and by suLking ua* of the 
External Cycle Start (SOS*) elgnal available on the MC68020. Tha 
The 8CS* algnal appeare during State of every bua cycle and tberfore 
can be used to Initiate the addraaa decode logic before the addraaa 
atroba la aaeerted by the procaaaor. Tbla allow* for aligbtly slower 
memories to be used and yet atill achieve the target of zero walt- 
atata operat ion . 

tb* diagram in rig 3 ahowe how the performance of th* H66OO0 f«mlly 
processors it related to th* mnmory *CC**i :;n. Th* high* it performance 
la achieved when any o f the processor* are designed to run with zero 
wait -Btatea. ** the memory iccm tlM la increased to tha point 
where walt-etatea are introduced into tbs system, the overall per- 



fonudct of the proceaaor dropa a a a stepwise function. The MC68020 
a a shown in the dlsgrsn baa the highest performance when operated at 
16. iT Hbi with xero wait-states. Whan on* wsit-ptst* i* incorporated 
Into th* ay*tem r there la a dramatic fall-off in performance of the 
MC68020 . This drop In performance Is equlvelent to loelng the power 
of »n 8 Khz MC69000 fron the total ayaten design. 

Sluice the oucaber of bus cycle* generated by the proceaaor for each 
operand tranefer la related to the alze of the Interface port and the 

way that l;be data la aligned io raemory. tbeae factor* influence 

the perfromance of the proceaaor. Hence the diagram of rig 3 for 

the MC68020 ahowe a difference between tb* best Caae timings And tb* 

average worat case tiainge. Th* highest performance la achieved by 

the MC68020 running cod* at 16.67 Mhx and having all tb* data value* 

properly aligned to avoid the need for multiple bu* cyclee. 

Memory Interface 

Tba prevloua aection mentioned bow the MC68020 32-bit microprocessor 
1* capable of interfacing to memory or perlpberal device* via either 
an 8, 1G or 32-bit dat* hue. The dynamic bu* siting capabilities 
designed Into tbe micropro*e**or will automatically generate tbe re- 
quired numb* r of bua cycle* needed to complete the operand tranafar. 
Tbua tb* bigb**t performance from an MC68020 system 1* achieved when 
tb* *y*t*m 1* designed to use a 32-blt Interface bu* . Tbi* 1* because 
internally tbe MC68020 microprocessor alway* >*aume» that it le 
connected vis * 32-blt dat* bue to the system tomewry «nd the proceaaor 
begin* an operand transfer by attempting to transfer 22-blts of 
information. During tbe first bua cycle of tha operand transfer, 
the proceaaor indicates that it la attempting a 32-blt transfer by 
setting the appropriate code on tba 812.0 and SXZ1 output pin*. 
Depending which band •bake cods la given* tbe proceaaor will either 
move on to tbe next operand transfer If it received • 32-blt handshake 
or generate generate extra bus cycles in order to complete tbe oper- 
and tranafar If an 8 or 16 bit bandahalce »*a racelved. If a 1 6 -bit 
Interface is u*ed in a eyatem design the processor will generate 
twice a* many bys cycle* to transfer a block; of 3 2 -hit operands and 
If an 8-bit bu* la u**d, there will be four time* the nwfcer of bu* 
cycle* generated. 

Zn * system design no*t activity will occur In tbe RAM aree of metozy. 
Therfore* it make* sense to deelgn tbe RAM section of the naaory to 
use a 32-blt interface bus,. The processor can then read and write 
up to 32-bltw of Information during each bus cycle which leads to 
a very high-performance ay*tem. Mo«t large acale ayatema use the 
ROM aection of tbe *y*t*tfl memory to contain either a low level monitor 
progran or a snail bootstrap laoder program which la capable of going 
out to aoot form of mass storage device and loading ■ more complex 
program aucb a* an operating system into tb* system RAM, since the ROM 
code 1* ueually not required very often by the pco*e**or, tbe eyatem 
designer aw nt decide what size of interface bu* to Implement. Most 
of tha commonly used available ROM* and UROHa are organized a* 8-bit 
wide data bue. For more complex syatema or higher performance, * 16- 
bit bus may b* used with tb* alight diaadvaatag* to tbe system pro- 
grammer tbat all tbe cod* which vlll eventually be put in tb* ROM or 
efkom pu*t b* '•pllt* into aepaxat* section* containing odd bytes and 
•van byte*. Th* highest performance 1* achieved using a 32-blt in- 
terface bum where tbe code must be '*plit' into four separate section* 
to allow* four ROM* or ZFROK* to be produced- 
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Dynamic Sub filing 

Tb* introduction of dynamic bua elting open* up • cbolc* to tba MC68020 
eyetea d**igr*r. Wow, wheo Interfacing I and It-bit peripheral*, 
tba d>aig?i»r may cboce* between a 'pacufto* 32-blt va, a 'true* I or 
lf-blt interface prot aa aboim In fig 4. . There ata advantage* end 

dle*dv*nt*ge* to both atthodi. 

On* cbolee. interfacing to an l-blt peripheral wltb a tmt f-blt port 
allows tba programmer to have a toftwitt lntarfaca to tba peripheral 
via 32-blt wide raad and writ* Inatructlon* . Tba procanor and tba 
external hardware automatically handle tba teak of dynamically airing 
tba bu* to tranafar 32 blta of data acroaa too actual l-blt port. 
Th* additional bua cyelee generated by tba pronator to tranafar tba 
data ir« tranpparant to tba proqrumr. which aleo allowa for faaer 
lloee of coda (I.*, on* MOVS.L Inatructlon iaetead of four HOVT . B 
lnatructlona). Thi a method therfoce fraaa tba programmer, but raqulrti 
external hardware to generate tba appropriate OSACK* one ad handahalca. 

Tba eecond cbolca, ' paeudo' 32-blt port Interfacing, !■ exactly tba 
oppoaito. With tbla method, tba ayat** deeigner baa choean to 
diaaallow nl*-*ls*d bua tranafara. Tba ax ludwd dynamic bua alzlng 
circuitry now force* tba prograanar to lntarfaca with tba (-bit 
porlphoral ualng l-blt raad and vrlta lnatructlona oxclualvoly <!-■• 
NOVX B) Th* dalatad hardware from tba DSmCX generation logic lee da 

to a am* liar ayataot cblp count and aoio board apaco but, cium tha 
programmer to wrlta an iecreeeed number of repetition* lnatructlona. 
Vling tbl> mathod, tha peripheral would glvo a 32-blt poit handshake 
to tb* procaaaor alkllar to tha naary bandabaka. Tba programmer 
would o**d to anaur* tbat all data tranafara appeared oo tba proper 
taction of th* data bua toy generating lyhe appropriate eddreaae* for 
the peripheral r*giat*r*. 

Senetetion of Data Strobe* 



Dynamic bua aiding on tba WC6I020 requires e*tec?tel hardwara to 

gonorato tba correct data strobe* which ara oftan ui*d to enable buffer* 
on tba data bua. Thi* la neceeeary, because tba Hc*t020 drives all 

sections of tba data bua OS a wrlta transfer aloe* tbo procaaaor 

doe* not know Initially vtoat wldtb of lntarfaca port la bolng ua«4- 

Th* hardware designer must ensure tbat tbo appropriate auction of tbo 

data bua lo uaod by elttbor using tbo generated data strobes lp tbo 

cblp ial»et logic or by ualng •xraroal trl-otato bufora on tbo data 

boa which aro an *h 1*4 by tbo generated data otroboa. 

Tbo logic moawjoal to generate tbo proper data strobes doaa oot require 
a largo amount of circuitry. Oo* mat bod, above in rig *» can bo 
implemented ualng a alnglo 24 pin 11- Input, '-output AMD-Oft-on/CttT 
logic array.. Tbla logic array uaaa if input* tbo two laaat significant 
addraaa lloee and tbo also information fro* tbo proceaaor along wltb 
a signal from tba decode logic Indicating tbo lntarfaca port width- 
Tba output* from tbla logic *rray ara four separate active low data 
atroboa which can bo oltbor bo fod back to tbo * -»—*'«- logic to gonorato 
approprioto cblp selects, or tboy can bo uaod to onablo trl-atata 
buffara on tbo system data bua. 

Tbo example aboo-v Is rig 3 la for a typical HC£f03D pfccaitor baeed 
ayatam. PAL* or FVLme aro augg* a t*d by tba autbora for quick, mini- 
mal system dmalgna, but for blgbor «p**d* or unlquo ay* to* deaigbe, 
they can bo replaced by a diocrato logic implement at Ion such aa that 
abown in rig C. Tbla abowa that tbo data atrobo ownaratioo logic is 



conatructed ualng three ?4L*M 3--2-S Input AlfX>-OfL-XHVB3tT gataa, on* 
74CS32 guadiuplo 2 Input OK gate, on* 74U11 triple 3 input AXD gat* 
and on* 7«L«0« box inverter. Faatar TTL fanlllea can bo aubatltut*4 
If a faatar data atrobo aeloct la needed In a particular ayetem 
doolgn. 

Interrupt Handling 

Tba interrupt handling capabilities of th* MC&I020 32-blt mlcroproceaaor 
ace almller to thoee of tbo other procaaaor* In th* M6I000 family, 
Th* procaaaor cblp contalna three Input aignal plna laiMlled a* n>LO- 
IPL2 Cxternol hardware la uaed to aot up on oncodod Interrupt 
level on thai* thro* Input plna. Tbo tbroo plno allow t different 
encoding! whero a cod* of s*ro indlc*toa on interrupt lovol veto, 
which Indlcatoa no Interrupt. The other aevan poaalbla encoding a are 
uaed to indicate Interrupt level* 1 to 7. Wh*n the procaaaor 
reoelve* an encoded Interrupt on tbeaa three input plna. It Inter- 
nally comporaa tbo lncoolng level of interrupt wltb tbo currant 
level of tbo lotorrupt maak - a three hit m**k wblcb la hold in tha 
procaaaor atatua regiatar. If the incoming Interrupt level la lower 

than or equal to the current auak lovol then tbo procaaaor Ignore* 
tba interrupt. On tbo other bmnd. If the Incoming lovol lo blgbor 
than the current maak level, the prooeaooc Internally flag* tbo 
Interrupt aa pending and eigriol* the fact via tba IPSND output elgnal . 
X* tha proceaaor reacboa an inatructlon execution bvuudmry, it check* 
for a pending Interrupt Acfcaowlege (IAOC) bua cycle. Tbo IACK cycla 
beglna Ilka a normal bua cycle but the function cod* output algnola 
axe ell aet to on* to indicate OO addraaa Cpowe *u>d tbo addxoa* bua 
la aet Indicate an interrupt acknowledge cycle. Tbla bua cyole can bo 
terminated in one of tbree vayn 

*) By the external hardware giving a normal D9ACK bandabaka 
b) By the external hardware aaaartlng tbo autovector IAVVC) input 
C) By tha external hardware aatertlng the Boa error (M9UI) Input 
Zf the normal DSAOL bandahaka la given, tha procaaaor letchae tbo data 
on tha lowaat byte of tha Interface port aod uaaa tbla l-blt data aa 
a vector number. zf the mVmC Input la aaaertod, the proceaaor inter- 
nally generatea tbo vector number for tbo autovoctor related to the 
incoming Interrupt level. Th* final option of tha BSftA bandabaka 
fore** tha ptoc*i»or to internal iy gonorato the vector number for tba 
•puxioue interrupt vector- One* tha vector bumfemr haa b**a generated, 
tba proceaaor aavoa tha exception vector offaet, program counter, and 
atatua regiatar on the active aupervlaor atack and then uaea the vector 
number to go out to the vector table and fetch the 32-blt addceaa' 
which la tbo atart adoroaa of the exception handling routine, 

Tbo MCvl02O doe* not contain the synchronous 4100 type bu* Interface 
alCjnal* found on tha aerlier procaaaore of the He SO 00 family, 
tberfora tba MC6I020 can handle auto-vectored interrupt* aa faat aa 
normal vectored interrupt a. Tbla mmana that tba bardwar* daaignar 
can 'bang' two different Interrupt eourcaa on each interrupt level 
without th* need for additional circuitry. On* of tb*a* aourcea would 
generate a vecror number during an IACX cycle end th* other aourco 
would force th* proceaaor to autovoctor. Hence ualng tbla technique 
it la poaalbla to directly aupport up to 14 external interrupt aovrcaa 
without tba need for a large amount of extra priority encoding logic. 
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By integrating all of the featurea deacrlbod in the prevlou* aoctlona, 
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it 1* po»»ibl* to deaign a typical HCCI020 proceaaor baaed ■lniMtt 
■ -/■?*■ au-h ij that ahown in rig 7. 

In tbla mini sua ayatest both the RAM and BOM p em ory ate inp lamented aa 
32-bit wide Hhemory and ui« tbe full width of tbe data bua for op*rand 
tranafere. Tbe I/O devicea are normally only avceaaed by tba proeeaeor 
very infrequently aad ara tbarfora deaigo-d to uit a alaaiL* B-bit 
vide data bua interface. 

Tba data buffer control logic •mu:*i that tba ralavant portion la) 
of tba data bua to the nunqr and peripheral devicea ara anablad 
during ewery bua cycla initiated by tba proceaa. Tbla control logic 
uaaa addxeea linaa AO wd XI *ad tba alia Bignala AIZO and sill Along 
wltb tb* knowledge of which port alsa> la balng uaad »*ltb which portion* 
of tba raeoory sap to perform ita function. it tnay be itapla»anted by 
a PXI» or dlacrata logic ■• previoualy deacrlbed. 

Tba bua bendabeXe logic davalopa tba appropriate DSACX ancodlnga to 
give to tba proceaaor on oacb bua cyda and alao containa tba bua 
error tlcaeout logic. Tbla logic alao receivoa an input fros tba In- 
terrupt logic to prompt it to gaoorata tba appropriate bandabaJce for 
»n Interrupt Acknowledge cycla. 

The addraaa decode logic la apllt into t*o aactiona . Tba flnt aection 
gonarataa tho chip aalact input* for all of tba aaaory and I/O 
davicaa . Tha eecond aact ion dacodea CPU addraaa apace eeceaeaa and 
davelopaa aelecta for breakpoint inatructiona. »*U acceaeea, Coproceaaor 
acceaaea And Interupt Acknowledge cyclea. Tbaae generated cblp 
aelecta could alao ba uaad by tba bua handaheke and buffo; control 
logic to generate the proper DSACK encoding and control the buffera 
on the data bua. 

Tha interrupt logic takes lnputa from all the interrupt aoureea in 
tha eyateo and genarataa tba encoded three bit interrupt level input 
to the proceaaor. When the MC66O20 run* tbe Interrupt Acknowledge 
cycle, tbla logic alao proapta the bue handahaka logic to generate 
either an encoded DSACK, AVXC or BCRU hendabake. 



ory la 



In the typical eUainum ayatan ihown in the dl*9r»B, tba R* 
iaa>iea>anted uaing faat atatic RAH devicea for tna^isoo performance. 
If e lower performance la acceptable, then dynamic ftAM devicea Could 
be uaad in the dealgn . Tbla would require an additional block of 
circuitry to handle tha dynamic RAM refreah requlremnta which would 
appear aa an additional aection in tbe block dlagraa of tbe sinlisua 
•yitam. 

Coitclueiana 



Zt baa been above the MC68020 32-blt microproceaaor allowa for vary 
eaay ayatea dealgn becauaa of Ita alarple Interface to enerocry etc. 
The Dynamic Sua siring eapabllltlea even allowa the proceaaor to 
Interface with exlatlng ateao ry and I/O ayatesia which Key only uae 
as S or 16-bit wide interface bua. Tbeea featuree, coupled wltb tbe 
eoftware compatibility of the MCCB20 with the other proeeaaore of thai 
M6BO00 family, allow for very bigb performance proceaaor ayateata to 
be quickly developed. 
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MICROTIME II 

Clock/ Calendar Board 



Clay Cederstrand 
326 4th St. South 
Martensvll le, Saskatchewan 
SOK 2T0 
CANADA 



I recently decided to acquire a real 
time clock/calender board for my homebrew 
6809 system running FLEX-09. Peruselng my 
latest copy of the 68 Micro Journal yielded 
a couple of possibilities. Since I had 
built up my micro-computer from bare SS50C 
and SS30 boards I chose that route again, 
assembling 1t myself. The clock/calender 
card I chose came from the AAA Chicago 
Computer Company, whom I had purchased 
hardware/software from before and was quite 
satisfied with the quality of the product as 
well as the service. 

The board is called the MICROTIME II 
board, and I purchased It as a bare card for 
$30 ( $45 Canadian ). The package was 
received quite quickly and consisted of the 
board and a eight page manual. The board 1s 
of decent quality, single sided, with no 
silk screening to Indicate component 
locations or trace paths. The manual, which 
consists of eight unbound printed pages, 
does however have a hand drawn diagram to 
assist you 1n the correct placement of the 
components. The rest of the manual contains 
a schematic, a description of the MSM5832, a 
description of how to program the chip, and 
two programs. The first, written in BASIC, 
allows one to program the MSM5832; the 
second is a very primative machine language 
routine that reads the registers and 
displays them 1n order on the CRT. Both 
programs are fine for establishing the 
workabHHty of the board, but are to 
primative or awkward to use for reading or 
writing to the clock under normal 
circumstances. 
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The board is very quickly assembled due 
to the low component count, once together it 
consists of a 5 volt regulator, the MSM5832, 
a 6821 PIA, a crystal, and a small number of 
passive components. The board incorporates 
battery backup in the form of three size AA 
nicad batteries which I mounted by glueing 
Inexpensive battery holders onto the board. 
After assembling the board I made one minor 
modification to the circuit, I have placed 
pull up resistors on the address, read, 
write, and hold pins. The MSM5832 has 
internal pull down resistors on these pins 
and the minimum input logic high (1) here 1s 
3.6 volts. Without pull-ups the logic (1} 
level is only 0.2 volts above the minimum 
required voltage. To be fair I used the 
board briefly without the pull up resistors 
and experienced no problems, but I consider 
the circuit operation marginal without them. 
The data lines are open drain and the data 
sheet also mentions pull-ups here, but the 
signal levels were always at Vcc or ground 
during either a read or write so none were 
added . The pull-ups are easily added to 
the foil side of the board using a 1n line 
4.7K resistor pack from pin 8 (CS) to pins 2 
(WRITE), 3 (READ), 4 thru 7 (A0-A3). The 
hold pin needs a separate resistor to Vcc or 
pin eight. There is only one adjustment to 
be made on the board, and 1t Involves 
tweaking a small trimmer cap in the crystal 
circuit to adjust the clock rate. 
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Once you have the board assembled and 
operating you will wonder how you managed to 
get along all this time without one. I have 
included two assembler programs to read and 
write to the board. The first, DAYTIME.CMD, 
reads and displays the day, date, and time 
1n either 12 or 24 hour format. It also 
puts the correct date Into the FLEX date 
registers. In order to avoid having to enter 
the date when FLEX boots, one should refer 
to the FLEX installation manual, page 43 
section 12. Specific instructions are 
Issued on how to disable the date prompt. 
Upon doing this and adding or changing your 
STARTUP.TXT to Include a call to 
DAYTIME. CMO, one will never have to enter 
the date again with the added benefit of 
having the time displayed on bootup. For 
those who do not have the benefit of the 
manual for the Installation of general FLEX; 
1t gets tougher. The problem 1s 1s overlay 
the call at address $CA02, which 1s a jump 
to subroutine , and replace the JSR 
Instruction with a return from sub- routine 
(RTS). The address to which the JSK 
Instruction points 1s actually the start of 
the date routine which you encounter upon 
booting FLEX. The second assembler routine 
, SETCLOCK.CMD, allows one to program the 
clock registers with the day, date, and time 
1n either 12 or 24 hour format. 



The board has one additional feature 
that I do not make use of, and that Is the 
ability to generate Interrupts. This 1s a 
desirable feature 1f one wants, for example, 
to implement print spooling and has no other 
timer to generate the necessary timed 
Interrupts. The board can be strapped for 
one of four time Intervals as well as the 
type of Interrupt generated, either NMI or a 
IRQ interrupt. The Intervals that are 
achieveable are roughly 0.3 msec, 1 msec, 
16.6 msec, and 1 second. TSC recommends 10 
msec for print spooling, so the 16.6 msec 
Interval would work reasonably well. 

I have used the board along with the 
two appended programs and have not had any 
problems. I have no reservations whatsoever 
about recommending the board as a 
Inexpensive addition to ones SS50 system. 
As a last note, the board 1s no longer 
advertised as a bare card but comes 
assembled for $60, my feelings are that this 
1s a good deal, the cost of the parts in 
addition to the cost of the bare board was 
only somewhat less than that figure. 



The 0M&2 clot* driver routine nil rruvt the unr 
for the current tie* and date infeeiation M«sstn 
to Pro»ra» the deck chip. The routine li versatile 
lit Hit it tivtt the user the abillti to ffilrii the 
clock i« either a 12 or 24 how foraiti resvltini in 
oitntr Stanford tihtarv tin* or a utrt conventional 
12 hour clock. utilfiiM Ml and PH. 

Cfcuoi tht CLOCK eiuete to rofloct the oontion of 
Bit clock card on tht I/O bus. 
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The Ri)r» authored or Clai Cederstrand 
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o The follo»iru are entry points for standard 
fill routines. 1/0 and othervise. This file 
o is intended to he used at aiseaolr tin* and 
o called as a horary. 





• Created Anust 10/84 






o Revision date: 

I 

etlex equates 



•wws edu tana 








CM 


Mrs start 


CB2A 


RSM10 MU 1CS2A 


restore 10 vectors 


CMt 


STAT EOU ICME 


oet tensnal status 


CC28 


K7EM HU «CC2B 


end usable eworv 


CD36 


ACtei EOU ICB3o 



o Input buffer noatei 



WWT EOU ttXM 


add B to I ret. 


CC14 


address last buffer char 


ODB7 


MTCH MU KS77 


oet next buffer char 


CffiO 


LlhfJUF EOU (COW 


lino boffer start to COFF 



o Routines to oet or output characters 

o 



aw 


IKJUFT 


lev 


tcoie 


input to line buffer 




rxi; 


OErcw 


■JL 


•C0I5 


oet terminal in rot 




die 


PUTC* 


eou 


tCDIB 


outrut char to device 




CJIE 


PSIBfc 


•01 


KSIE 


output a char strtne 




C009 


IMEH 


EOU 


•C009 


oet char froa teroiinal 




CT24 


PCRLf 


EVTj 


SCD24 


output a carriaae return-line 


feed 


CDS? 


an dec 


EOU 


K939 


ootput dtciMl Mater 




aw 


i wee 


ESU 


•C048 


input deciMl niaher 




an 


amti 


EOU 


•COX 


ootPUt a hex neater 




CMS 


CtlTADP. 


ESU 


K043 


outnt hex address 




aoi 


cuss 


EOU 


taut 


Check for alrhi-neaoric char 




C042 


omo 



• DOS r 

| 


EOU 


•CM2 


Nt hen nutter 






oatiMS 






aof 


OUTOf! 


EDU 


•CDCF 


output char to device 




0406 


FT6 


EDU 


two* 


FW call 




anf 


IfllW 


ESU 


btJCF 


rerort error 




C02D 


OEIFIL 


EDU 


KD2D 


let file spec 




□00 


LOU 


EDU 


•CO» 


loedflle 




CB33 


SETEIT 


EDU 


•OBI 


set file extension 




CD4B 


0COM 


EDU 


•CMb 


call DOS as subroutine 




E060 


ace* 


EOU 


•EOfcO 






aw 


FU0AY 


EOU 


(CC0F 






act 


FUMM 


EDU 


•CCOE 






a io 


run 


ESU 


KCIO 










o Init 


alize 


tht PIA such that : 






PA0-M? are 


eotrati 








o PBP-PB7 are 




OOtPUtl 







28 



April 86 



'68' Micro Journal 



C100 






OK 


♦ClOO 




ClOO 20 


01 


START 


BRA 


INIT 




Cl«2 01 




WF 


fX8 


1 




cm a 


EOW 


1NIT 


till 


•COO 




CI06 « 






ORA 






C107 A7 


01 




S7A 


!•' 


cltar control rtm 


CIO? A7 


03 




STA 


3.1 




CIOB 43 






COW 






CIOC A7 


M 




STA 


0.1 


stt A as tutnit 


C10E A7 


02 




STA 


2.1 


Itt B as cut rut 


C110 86 


04 




LM 


nooooiioo 


CI 12 tt 


01 




STA 


i,i 


stt cUtt rfi actlvt 


CI14 A7 


03 




STA 


3.1 








o 
•6tt 


tk« clOtk diti 








* 









cut ioa 


C75 


CU3MT 


LDy 


•BUFFER 




C1IA « 


C2A7 




IDi 


iBwte- 




CUD BO 


COT4 




J» 


POTJ 




C120 BO 


COIE 




JSJ! 


PSDWG 




CI23 BO 


CTCI 




.» 


PCR.F 




Cl2t BE 


C377 




LOI 


IYRP6C. 


•ft the itu 


an bo 


C237 




,JbP 


ttyin 




CI2C BE 


C3S* 




101 


tOM 


lot tW Mdtf. 


CI2F 80 


C237 




JSP 


ttyin 




CI32 BE 


C3A7 




LOI 


MMfflSG 


ttt tht dato 


C135 BO 


C237 




JSP 


ttyin 




CI3B BE 


C4CE 


BFTLF* 


LSI 


IW 


it it Imp »tar? 


CI38 tffl 


act 




JSP 


pea/ 




CI3E BO 


COIE 




JSP 


PSTRJC 




C141 BO 


CD15 




JSP 


OETO* 




CI4I 6A 


20 




UK 


1:00100000 


C146 81 


7? 




CWA 


B'T 


it iP 


CI48 27 


17 




BE8 


LEAPVR 




CI4A 81 


It. 




m 


#'h 




C14C 27 


08 




ED 


HUAP 




CltE 8E 


C4€4 




LOI 


•099150 




CI51 BO 


LTU4 




JSP 


PCRLF 




CIS* BO 


COIE 




JSP 


PSTBC 




CI57 20 


OF 




BTK 


OFTLPR 




CIS A* 


A3 


MUAP 


UK 


.-Y 




CI3B 84 


<W 




MBA 


1100000011 stt 010 <»r u Ih> ttir 


□30 A7 


Al 




STA 


,Yt+ 




CIV 20 


06 




9* 


OFTDAY 




CUI A6 


A3 


LEAPYS 


UK 


.-V 




C163 8A 


04 




OK 


IIOOOOOIOO Itt D10 (or loir T*lf 


Clt5 A7 


Al 




STA 


• Y« 




C167 BE 


□80 


UETWY 


un 


HATDAY 




C16A BO 


C237 




JSP 


TTYlM 


Mt th« div of vrok 


CltO At 


M 




LDA 


0.-V 




Cltf 31 


3F 




LEAY 


-l.Y 




CI71 A7 


AO 




STA 


0.1* 




CI73 8E 


C424 




LBI 


BMKTGG 


fft t(» hour 


C17t BO 


CZJ' 




JSP 


TTYIN 




tin be 


C47t 


trtax 


IDI 


MATCU 


ftt 12/24 fsr»4t 


CI7C BO 


C024 




JSP 


POtF 




C17F BO 


COIE 




JSP 


P5THC 




C182 BO 


0)15 




JSP 


BETOfi 




C183 8A 


20 




DM 


1100100000 


CI87 81 


6£ 




Q4PA 


Tn 




am 27 


40 




ED 


ITS24 




ciee 8i 


n 




art, 


O'V 




CI8t 27 


08 




BEG 


on ATI 




CI8F BE 


C4E4 




IDI 


HJidSi 




CI92 BO 


QUE 




J* 


PSTTM 




cm BU 


C024 




JSP 


PCHF 




cm 20 


tt 




UK 


OETO* 




CI9A BE 


C454 


GETM 


LOI 


MFIISG 


HtMtrFtl 


cm 80 


□C4 




jst 


POV 




CIAO BO 


COIE 




JSP 


P5TT8C 




C1A3 BO 


ais 




JSP 


OEIOff 




ClAt 8A 


20 




aw 


17X0100000 


CIAB U 


r> 




OTA 


I'Y 




C1M 27 


17 




SCO 


iism 




CI AC 81 


at 




at* 


r« 




C1AE 27 


08 




BED 


ITSJPI 





C1B0 8E 


C4E4 




IDI 


MWCC 


CIB3 BO 


CJJ24 




JSft 


FW 


CIBi BO 


COIE 




.« 


PSTPJC 


CIFJ9 20 


OF 




ERA 


CETAJ1 


CIBI At 


A3 


ITSWI 


IDA 


• -< >ct HIO and lot 12/ AM 


f IBB 84 


03 




AMM 


•W0000011 


CIBF A7 


A] 




STA 


.Y*+ 


C1C1 20 


OE 




BRA 


OETHIN 


C1C3 At 


A3 


ITSPH 


IDA 


.-Y 


C1C5 8A 


04 




ORA 


IIOOOOOIOO Mt NIO For 12/PH 


CIC7 A7 


Al 




STA 


.in 


CIC9 20 


06 




BRA 


OETNIN 


CICS At 


A3 


ITS24 


LDA 


.— Y 


CICO BA 


OS 




(DA 


I10000100O 


CICF A7 


Al 




STA 


.Y»* 


C1D1 HE 


C4AI 


CETAIM 


LD! 


MIWGC 


X1D4 BO 


C237 




.SH 


TTY1* 


C107 BE 


C280 


AOJK 


LOI 


KX 


C1DA BO 


at?4 




JSR 


Pdaf 


ClOO BO 


(DIE 




JSR 


psth« 


CUO BO 


CDI5 




JSP 


GETCW 


CIE3 6A 


20 




ORA 


IIOOIOOOOO 


CIIJ 81 


7? 




CWA 


•'T 


CIE7 1027 FF28 




LBEB 


OMMT 


C1EB 81 


« 




avt 


I'D 


C1E0 27 


06 




BE« 


SETHfl 


CirF 8E 


C4E4 




IDJ 


•OSM5S 


C1F2 BO 


cn?4 




JSP 


P015 


C1F7 BO 


COIE 




JSR 


PSTBC 


C1F8 20 


00 




BRA 


ALL OX 



CtFA BE 
CI Ft 86 
CIFF IF 
C20I A7 
C203 4A 
C204 81 
C206 26 
C208 I08E 
CJOC E7 
C20E At 
C210 A7 
CJ12 CA 
C2I4 E7 
C216 C4 
C318 E7 
C21A 5A 
DIE CI 
C21D 27 
C2IF 20 
C21 BE 
C224 BO 
C227 BO 
C22A BO 
C22I 4F 
02E A7 
C2» A? 

a» n 

C735 31 
C237 BF 
C73A BO 
C23TJ BO 
C240 BO 
CJ43 80 
Ci45 CI 
C247 27 
C349 A7 
(348 BO 
Q4E BO 
C350 CI 
OS2 27 
C354 A? 

cat 3» 



EO60 

2C 

99 
02 

00 
FB 
C275 
02 

AO 
64 

40 
02 
2F 
02 

21 

02 

EB 

C4C5 

CS24 

COIE 

CS15 

02 

84 

CO03 

3F 

C273 

C024 

COIE 

COIS 

12 

00 

a 

AO 

C015 

07 

00 

El 

AO 



Tht (olloxicw routlno onakltl tho hold foiKtio* »( 
th* clock chir. tkfn rrocoodi tt arito tt* clock 
rnt!t»r» fro* tho tor IYRIO) to fi* list (Mill. 
Tho loconds rtoistor is lutoMticlllr rosot to 
uron witini into tho (Mr, 





StTDO 



LOOP 



SETWT 



OUK 



TTYUET 
TTYIN 



ua 

LOA 

TFS 

STA 

DECA 

OPA 

M 

LOY 

STB 

un 

S1A 

ORE 

STB 

AM* 

SIB 

DECS 

an 

BEO 

WA 

ua 

JSP 

J5R 

JSP 

QJK 

STA 

STA 

M- 

IEAY 

ST I 

JSP 

,6P 

JSP 

B5R 

an 

BES 
STA 
JSP 
B5R 

cm 

BED 

STA 
BTS 



moot 
nx 

A.B 
2.X 



tot hold rlus iddrtis YIO 



rtoo 

LOOP 

•eVUR 
2.1 
0.Y» 
0.1 

1101000000 

2.1 sot hol4.aritt.and addross 

1100101111 strobr arito 

2.1 



H2! 
OONE 

SETWT 
•FINISH 
PCRLF 
PSTFM 

OETO* 

2.1 

0.1 

»W 

-l.Y 

TOP 

PCRLF 

P5TWG 

OEIOfi 

STRIP 

MOO 

TTYIN 

0.Y« 

OETOfl 

STRIP 

HOC 

imp 

O.Y» 



clvtck (or last rmstor 



itt all control lints lov 
sit all data lints In 



cktck (or ottry trror 



'68' Micro Journal 



April 96 



29 



• Thn r.ntint auJtt tbc hull arOr urMIc 



chick (of ImMi tfiln 



CZ37 a 


fT 


smip 


UB 


MfT 


C2S9 8! 


30 




cm 


H30 


OS 2D 


07 




BLT 


EWSF 


C75D 81 


3» 




cm 


•*3» 


C3F 2 


03 




BDT 


Bum 


C261 84 


OF 




MM 


•tor 


C243 37 






RTS 




C264 C4 


00 


EIMn 


LD8 


tMO 


an, k 


C4E4 




Utt 


WMRC 


C»9 BO 


cs?4 




JSR 


PCO/ 


ate n 


Ol£ 




JSR 


PS1RW 


C2tf BE 


C273 




LDI 


tot 


C272 39 






RTS 




C273 0000 




TW 


FOB 





1275 




WTW 


nc 


11 



cluck (or lrt.ttr tntn 9 



Cat 48 tl 76 65 
C284 20 79 tf 75 
C288 20 60 61 64 
CMC 65 20 61 tf 
(2» 7? 20 65 6E 
C39 4 74 72 TV 20 
0» 65 72 72 tf 
C29C 72 73 20 28 
C2A0 59 SC 4E 29 
C2A4 20 3F 04 
C2A7 41 6C 6C 20 

C2M 65 « 74 72 
C2AF 79 73 20 73 
Citt 68 6F 75 6C 



• tttllttf T.bl* 

* fCC /Hiv« rtu n4« jiw tutfT nreti (V\K) ?/.*( 



FCC /AM ««trn should It tw> dilitl. «lt» > INtfinf/.tt.tA 





Software •Editions 



0"! 



DRIC - A •cnci orleotod TEXT EDITOR with evellsbllity of 
NEia 1 aid. Nicro deflnltlone, conf igurable 'permanent 
definable MACROS' - all standard ftitur#t and the faataac 
'global' function* In the Meat. A alaple, automatic terminal 
conflg program makes thla a real 'no haatel' product. Only 6K 
In sift* leavlnR tlie average eyatee over 165 aectora for teat 
buffer - appx . 14.000 plua of fraa eeaoryl Extra fine for 
programming as well s* text. 

Regular 9129*93 

• special vrwDcnop offer • rua $69.93 



O 



l«S-t£>rT - A TSC BASIC or XBAS1C ecreen editor. Appended CO 
BASIC/XBASIC, BAS-EDtT If transparent Co normal BASIC/XBAS1C 
Operation. 

Allows editing while In SASIC/XBASIC, Supporte t hi 
following function*: OVEKLAT, 1NSEET and DUP LINE, Hake. 
editing BAStC/XBASlC progra.e SIMPLE1 A CUAT tie* aod 
effort a. ear. ProjEraaorre love it! NO .tore retyping entire 
llnea. etc. 

Co. plate with o<xr 2 5 different CUT terminal configuration 
overlay.. 

FLEX. CCI, STAR-DOS Regular S69.95 
Uadted Offer: J39.95 



o 



A FLEX Mara rebel malt Directory Program 



BIER la a aodern hlerarchal acoraga system for usara 
under FLEX. It anawera the naeda of choae who have hard 
dlak capabllltlea on their eyateee, or aeny (Ilea on one 
dlak - any ilti. 

Dalng BIRR a regular (any) FLEX dlak tB - 3 - turd dlak) 
can have sub directories. By ehie aschod the problems of 
••signing unique naaac to files la laaa burdenaoae. 
Different filea with the exact aaae out uy be on the 
eaae dlak, aa long as they era in different directories. 
For the wlnchaater uaer thla becomes a auat . Sub* 
dlractorlea are the aodern day solution chat all currant 
large ayateaa uae. 

Each directory looks to PLIX Ilka a regular file, except 
they Have the estsnalon '.DIR*. 

A full eat of directory handling progress, are Included, 
asking the operation of RTU. alaple and straightforward. 

A apaelal Inatall package la Included to Install BUR to 
your particular vara Ion of FLEX. Sobs ssssably required. 
Install Indicates each byte or reference change needed. 
Typically - 6 byta changes In sourcs (furnished) and one 
esseebly of HUB Is all that la required. Ho progreaaiog 
required I 

lot roc.urr.loa Special 

$69-93 
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%qm~ (.oCalllidri SrTMlh H3 
™ *>* rH*ion. TN 37343 



ftiit #$§*•« 

CaCa o*-+- rvax' 

SOrTfflfiRE 



.nip (615) «4}-4»0 
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PAT - A full feature screea oiieotetf TEXT EDITOR with all the 
best of "PIE (ta)". For those who swore by and loved only 
P3E, this is for youl All FIE fsstures end auch acre. Toe 
msny festurss to list. And If you don't like theae, change or 
add your own. ?L-9 aource furnlahed. "C* aource available 
soon. Eaally configured to your CRT, with special confix, 
section. 

Regulsr FLAX 1129.30 
« SFICIatL arniHDCT>0« OPFXR • FLO 979*93 

SfTCUL PAT/JVST COKRO 
PAT « JVST (w/aourca) FLEX 599.93 

Note: JUST In "C" eource available for OS-9 

** See JUST advertlalog - S.I. HROU Catalog - thla laaue 



fUClAPMCaRS 6 ITSUfl TOOLS 

SOLVE - OS-9 Levels 1 sad IT ealy. A syabolic Object/logic 
Verification k Exasdne debugger. Including inline debugging, 
dleaaaeable and aaseablc. SOLVE IS TBE MOST Coaplece 
DEBUCCKR «s haee seen for the 6S09 05*9 serlaal SOLVE doee 
It allf With a rich aelection of Monitor, aaeeablsr, 
dlaasDeabler, envlronacntsl, execution and otl-er alscelleneoua 
coavsnds, SOLVE is the MOST POWERFUL tool-kit ltea you cen 
own! Yat, SOLVE le elaple to uscl with coaplcte 
documentation, a anapf Everyona who haa ordered this package 
has raved! See review - 68 Micro JooroeJ - Deceeeer 19»5. 
No 'blind* debugging here, full acrean displays, rich and 
coaplete information presented. Sines review in 68 Micro 
Journal, this Is our fastest aoverf 

Lewie 1 6 n ooly - OS-9 regular 9149.93 

* SPECIAL OfTRODUCnCW OFFER * $69.93 



■*Bote: Pleaaa note the apecial diacounta (lialtad tie*} of 
aaaorted eoftware in the S.E. MEDIA catolog in thle and other 
laauea. 

Also plesae note the new policy on documentation of aoas 
S.E. MEDIA owned or licensed eoftware producte offered in 
their catalog, and repeated below. 

Moat all proftraas have the documentation In text dlak file 
format. If you can print It out on your printer, die price Is 
ms shown In the catalog for the software. If you want us to 
print It out, pieaae add 525.00. Thle la our average 
reproduction, abort run coat. On most all ltea*, the savings 
ia well worth your doing the printing. However, chla Is only 
done to lielp save you earned dollsra. All other software haa 
vendor furnished documentation Included in the price. 
Another -"your choice" S.E. MEDIA feature f 
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^ K-BBSIC updates are nom available. If gou 
purchased K-BBSIC prior to Jnlg 1. 1985 
and nrish to have goor K-BBSIC updated, 
plaaee sand $35 enclosed roith gour master 
disk to Southeast media. 

K — BASIC und»r OS-9 and FLEX will now compile 
TSC BHSIC. ZBBSIC. and IPC Source Code Files 



Telex 5106006630 



(615)842-4600 



2-4600 m 

5900 Cassandra Smith Rd. 

Hixson. TN 37343 

for information 

CSlI (815) 842-4(01 

CoCo OS-9" FLBX'" 

SOFTUI/IRE 



V 



fw — BHSIC no ui mokes the multitude of TSC NBflSIC Softuiore 

Quolloble for use under as-9. Transfer your fauorlte OHSIC 
Prtgromi to as-9, compile them, Assemble them, and 
Q3QQGJCD — usable, multi-precision, familiar Softuiore Is 
running under your fauorlte Operating Systeml 

K — BHSIC <OS-*» or FLEH). Includlji ff the assembler 

Ml Special Ml ^^JJusaltC $ 99 « 




Sculptor 




Sculptor for 6802ft 

OS-9 and UniFLF-X 

$995 



Microprocessor Iknlo^Mitl Ltd. 'a Commercial Application Cticntor Prograo provides a PAST 
Commercial Application Developnent tool unavailable to thr OS-9 and UnlFLKX Uaer before, rvvwlnp .iny 
Coaaerclal Application In 20Z of the normal required time; gain easy updating or customizing. PLUS, 
the Application can also be run on MS-DOS and Unix wachtneat Sculptor handles input validation, 
complex calculations, and exception conditions as veil as the normal collecting, displaying, reporting, 
and updating Information In an orderly faahlon. Key fields to 160 bytea; unlimited record size; file 
aire should be held to 17 million records. Utilizes ISAM file Structure and B-tree Key files for rapid 
accent. Input and Output communication with other programs and files plus a library of ISAM routines 
for uae with C Programs. Run-time Included w/ the Development package; a compiled Application only 
needs a Run-time License. Additional charge for Networked Units. Prlrea for Qnmlopamat r*cka«e/lua- 
tlms. Discounts available fur purchases of 5 or more Run-time Packages. 
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tor information 
call (815) 842-4601 

CoCo OS-9" FLEX" 

SOFTWARE 




HSSEIIIBLERS 



ASTN1K09 from S«atn*ast Hedll — A 'Structured Assembler for the 
6809" which requires the TSC Micro Aitmattier. F. CCF - 199.95 



Micro Assembler for TSC -- Toe 



FLEX STAaTUXXO Assembler. 
Special -- CCF 135. 00; 



F JS0.O0 



OH Extended 6609 Hacro Assembler froa Lloje) I/O. -- Provides 1oc«l 
labels. Motorola S-records, and Intel He» records; XREF. Gene- 
rate OS-9 Memory nodules under FLEX. FLEX. CCF. OS-9 199.00 

Relocating Assembler w/L1n»1ng Loader froa TSC. -- Use »1th aany of 
the C and Pascal Compilers. F.CCF S 150. 00 

aUCt, by Crahas Trott fros Wind c Mb Micro tr>t«mw -- Co-Kvaldent 
Editor and Aaaeobler; faat interactive A.L. Progressing for full 
CO Bcdlus-altad ProKres.- F.CCF - $75.00 

sua —MACK w/ Ccgn A»aesMer for 6600/1/2/3/6 F.CCF - S91.00 

TRUE CROSS ASSENRLCRS from Computer SyitcBi Consultants — 

Support • 1602/5. 1-80, 4000/1/2/ 1/B/ll/HCll. 66(1*. 66U5/IIC05/ 
1*6805. 6809/00/01. 6502 lastly., 80KO/5. 6020/1/ J/35/C J5/39/ 
*0/*6/C<8/<9/C*9/50/87<6/*9, 6ll)t/ll/ll71l, and 6hfton Syatesa. 
Aaeespter and Lfdtlnr. fornata vase •» turret Cru'a fi*m*l. 
Produce* saehln lndvpvndcnl Motorola S-Tejir. 

ttxx, CCF. l>S-», UnlFI.KX ncli - $50.00 Source - $50.00 car ft 
any 3 - $100.00 
complete (rt w/ C Source ( ancept Cite 46000 Source) -$300. 00 

XASM Cross Assemblers For FLEX froa Coapvunse Ltd. — This set of 
6800/1/2/ 3/S/8. 6301. 6502. 8080/5, and 780 Cross Assemblers 
uses the faalllar TSC Macro Astanater Coasand Line and Soruce 
Code forwat. Assembler options, etc.. In providing code for the 
target CPU's. Complete set. FLEX only - 5150.00 

CXASHI froa LlsM I/O — 8-Bit Macro Cross Asseabler wltn sane 
features as OSM; croIS-alMable to 6800/1/2/3/4/5/8/9/11. 6502. 
1802. 8048 Sers. 80/85. 2-8, 2-60. TMS-7000 sers. Supports the 
target chip's standard mnemonics and addressing sodes. 

FLEX. CCF, OS-9 Full package — I3t9.00 



ousna 16.32 from Lloyd I/O — 



Cross Asseabler for the (8000. 

FLEX, CCF. OS-9 1249.00 




Aid tl U.S.A. 

(•II. SI. JO) 

Add 31 Surface PoroJfo 

lOZ Air Porvlio 



"FLEX is a I'aOemark of TK'nxcai Syalams Consufianls 
""OS9 is a IrmOamark ol MtCrOvrar* 

III Pie- 



DISRSSEITIBLEHS 



SUPER SLEUTH froa Coses ter Systems Consultants — Interactive 
Olsasseabler; extrenely POUERFULI 01 sk File Binary/ASCII 
Exanlne/Change, Absolute or FULL Disassembly. XREF Generator. 
Label "Nine Changer", and Files of "Standard Libel Nines" for 
different Operating Systeeis 



Color Coapatar 

CCO (32K Req'd) ObJ. Only 149.00 

CCF. ObJ. Only ISO. 00 

CCF. w/Source 199.00 

CCO. ObJ. Only ISO. 00. 



SS-SO Bos (ill ■/ A.L. 
F, 199.00 
U. 1100.00 

o. noi.oo 



uVRAMITF. ♦ from Coapatar lyttaax Caatar — Excellent standard 
"Batch Node* Olsasseabler. Includes XREF Generator and 
"Standard Label* Files. Special OS-9 options «/ OS-9 Version. 

CCF, ObJ. Only 1100.00 CCO. ObJ. Only I 59.99 

F. " $100.00 0. " " 11S0.00 

U, " - 1300.00 



o 



|pnoGnnmminG|LRnGURGES 

FL/9 fros triad rub Were (yetaaa — By Grehaa Trott. A combination 

Editor /Compiler /Debugger. Direct aource-co-object coopllltlon 
delivering faat, conpact. re-entrant. ROn-able, PIC. 8 6 I6-Mt 
lncegera 4 6-dlglt Real numbers for all real-world problaaa. 
Direct control over ALL Syitea resource*. Including ioterrupte. 
Coaprehsnnlvs Library support; staple Machine Code Interfere; 
atep-by-atep tracer for lnatsnt debugging. SeNe page Manual 
vlth tutorial guide. P. CCF - 919R. M 

WHIMSICAL froa WMaslcii Omlopacntt — Now supports seal Rmabers 

"Structured Programing" WITHOUT losing the Speed and Control of 
Asseably Language! Single-pass Coapller features unified, user- 
defined 1/0; produces RQRible Code; Procedures and Modules 
(Including pre-conplled Modules); many 'Types* up to 32 bit 
Integers. 6-dtglt Real Rvabers, unllalted sized Arrays (vectors 
only); Interrupt handling; long Variable Nanes; Variable 
Initialization; Include directive; Conditional coaplllng; direct 
Code Insertion; control of the Stack Pointer; etc. Run-T1v* 
subroutines Inserted it called during compilation. Korailly 
produces 1C4 less code than PL/9. F and CCF - 1195.00 

C Coapller froa slrtdrith Micro System* by Janes McCosh. Full C for 
FLEX except bit-fields. Including an Asseabler. Requires the TSC 
Relocating Asseabler If user desires to Implement his ovn 
Libraries. f and CCF - 1295.00 

C Coapller froa Introl — Full C except Doubles and Bit Fields, 
streamlined for the 6609. Reliable Coapller; FAST, efficient 
Code. More UNIX CoaPatlble than most. 

FU!X. CCF. OS-9 (Level II OsTJ). U - $375.00 



PASCAL Coapllir from LucldaU -- ISO Based 
Designed especially for Mlcroconputcr Systems. 
Assembler Code for naxlaus flexibility. 

F and CCF 5" - »••.•» 



P-Code Compiler. 
Allows linkage to 

F 8" $«».«5 

■4SC4L Corns tl«r fros Oasgsasrt (n« Cmrtlflmd Wmn) — For the 

FlOriHtOIlX; ISO Stead i Native Code Compiler. Frlssrlly for 

Real-Time end Proccle Control apptlceclone. Powerful; Flexible. 

Requires a "Motorola Compatible" Relo. Aemo. and Unking Loader. 

F and CCF - $425.09 One Tear Keint. - $100.00 

K-9ASIC fro* LLOTO I/O -• A "Native Code' RASIC Compiler which 1s 
now Fally TSC ItASIC coapatlble. The coapller compiles to 
Asseably Language Source Code. A HEN, >treea11md. Asseabler Is 
now Included allowing the asseably of LARGE Compiled K-BASIC 
Prograes. Conditional asseably reduces Run-t1me package. 

FLEX. CCF. OS-9 Coapller vita Assembler - 1199.00 

CRtMCK COaOL froa Coaputaas* L«at. -- Supports large subset of ANSI! 
Level 1 COBOL with aany of the useful Level 2 features. Full 
FLEX File Structures. Including Random Files and the ability to 
process Keyed Files. Segment and link large programs at 
runtlae. or tapleaented as a set of overlays. The System 
requires 56k and CAN be run with a single 01 sk System. 

FLEX. CCF; Normally 1199.00 
Special Imtrodsctmry Prlea (while In effect) — 199.95 

FORTH froa Stearns Elactraalct — A CoCo FORTH Programming 
Language. Tailored *» tat CoCo! Supplied on Tape, transferable 
to d»i». written In FAST ML. Miny CoCo functions (Graphics. 
Sound, etc.). Includes an Editor. Tract, etc. Provides CPU 
Carry Fltg accessibility. Fist Task Multiplexing, Clean Interrupt 
Excellent 'Learning* tooll 

Color Computer 0M.1 - $91.95 



Handling, etc, for the "Pro" 




AmaLLAfcUlty 

r « FLEX, co> 

O " OS-9, COO 

■ ItllFLFX 

CCS - Color Computer Disk 

GCT ■ Color Computer Tape 

I III 



Color Computer FLEX 
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llSDFTWH HE {DEVELOP ih EnTljf 



Bas1c09 IRcf froa Southeast Media — TMs BaslcCM) Cress Referrac*) 
Utility Is • 8»jlc09 Program which win produce a "pretty 
printed' listing with each line numbered, followed by a complete 
cross referenced listing of ill variables, enternal procedures, 
and line nuabers called. Also Includes a Program List Utility 
which outputs • Fist 'pretty printed' listing with line nuabers. 
Requires Bas1c09 or RunB. 

1 CCO obj. only -- 139. »S: w/ Source - Jtt.95 

lariAmf riSClX DTILrnU (U«ulr«« UtCTJkAXJi h»Ul «er 3) 
Ilir — produce ■ Cross Kefarence Uetlng of any text; oriented Co 

Pascal Source . 
rgCLUDI — Include Other Files In a Source Tent, Including Binary; 

uollmlted nesting capaolllttaa, 
PROFILl! — provides in Indented. Numbered. St ructograa" of a 

Psscsl Source Test File; view the oversll structure of lsrgc 

progrsas. prograa Integrity, etc. Supplied In Pascal Source 

Code; requires compilation. 
F, CCF UOt Ottllty 5" - $40.00, 8" - $30.00 

DUB froa Scatheajt Media -- A UnlFLEX 'baste' Oe-Coapiler. Re- 
create a Source Listing froa UnlFUX Coamlled basic Programs. 
Works w/ ALL Versions of 680g UnlFLEX basic. U - 1719.95 

FULL SCKEEB F0I8IS OISPLAV froa Coaamter System Coawlteetl — TSC 
Extoaded BASIC prograa supports any Serial Teralnal with Cursor 
Control or Memory-Mapped Video Displays; substantially extends 
the capabilities of the Prograa Designer by providing a table- 
driven method of describing and using Full Screen Displays. 

f and CCF, U - 315.00, w/ Source - $50.00 



DISKIUTILITIESH 



OS-9 VDIsk from Southeast Media — For Leeel I only. Use the 
Eiteaded Meaory capability of your SHTPC or Gtats CPU card (or 
slailar format OAT) for FAST Prograa Complies, CMO execution, 
high speed Inter-process communications (without pipe buffers), 
etc. - SAVE that Systea Memory, virtual Disk size 1s variable In 
« Increments up to 960K. Some Assembly Required. 
— Lmeel I OatY — OS-9 obj. only - J79.9S: w/ Source • 1149. IS 



o 



0-F froa Saetaeatt Madia -- Written 1n 8ASIC09 (Hits Source), 
Includes; REFORMAT, a BASIC09 Prograa Wet refomats a chosen 
amount of an OS-9 disk to FLEX Format so It can be used noraally 
by FLEX; and FLEX, a BASIC09 Prograa that does the actual read 
or write function to the special B-F matter Disk; user-friendly 
aenu driven. Read the FLEX Directory, Delete FLEX Files, Copy 
both directions, etc. FLEX users use the special disk Just like 
any older FLEX disk. tPlOiL Ml aa\T OFFW 0-$3».»S 

COPTNULT froa Sea that it Hadla — Copy LAME Disks to several 
trailer disks. FLEX utilities allow the backup of AIT siaa alas 
to any SMALLER site diskettes (Hard Disk to floppies. 8* to 5*. 
etc.) by simply Inserting diskettes as requested by CQMIaHT. 
No fooling with directory deletions, etc. COrTHULT.CHT 
understands noraal 'copy* syntaa and keeps up with files copied 
by maintaining directories for both host and receiving disk 
systea. Also includes BACKUP. CMS to download any site "randoa* 
type file: RESTORE, CUB to restructure copied "randoa" files for 
copying, or recopylng back to the host systea; and FJtCEinaT.CMD 
as a 'bonus" utility that 'relinks' the free chain of floppy or 
hard disk, eliminating fragmentation. 

Coatlataty Ixa t l W AjaaaMy Lai"iae«e Stvarco files iKlestMl. 

ALL 4 Prograas (FLEX. 8* or S*> J99.S0. 

COPYCAT froa Lacldata — Pascal MT required. Allows reading TSC 
Mlnf-FLEX, SSB 00S6B. and Digital Research CP/M Disks while 
operating under FLEX 1.0, FLEX 2.0, or FLEX 9.0 with 6BO0 or 
6809 Systems. COPYCAT will not perfora alracles. but, between 
the prograa and the aanual, you stand a good chance of 
accomplishing a transfer. Also Includes son Utilities to help 
out. Programs supplied In Modeler Saarca Coda (Asseably 
language) to help solve unusual problems. 

F and CCF 5" - $90.00 F 8" - J6S.00 



3 3 cd 



Add IX U.S.*. 
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% j}Yfl Hit? 

5900 Cassandra Smith Rd. 

Hixson. TN 37343 

for Information 

call (615) 642-4601 
CoCo OS-9'* FLEX" 

SOFTWARE 



FL1I DISK PTILITIII froa C 1 H at Bls t aaB Caaumiteata — Bight <*} 
dliferent Aassabl? Language <w/ Source Code) PLsJt Utilities for 
every FLM Users Toolbos: Caaj s File with O0S Irrors; Taat Hik 
for errors; Caaaan two Disks; a feet Diaa tacssa, Prograa; Mlt 
Disk Sactare; Uasartsa Free-Ceol* on the Disk; print Wsk 
talaatlfleatlaa; and dart and *afU« the Disk Directory (In 
sortsd order). — PLUS — Ten MUSIC Progrsas Including.* A 
U*1C la a aa aaa Bar with urmAa over 1BMT like check for aleslng 
label definitions, processss Diek to Disk Instead of In Memory, 
■ it:. Other progress Caasara. Marge, or Ceaarate UadaCaa 
between two BASIC Progrsas, check BASIC Seeeeece Beaaars. 
coaPara tarn smea ^ easead Kiss, end 5 Prograas for astsbllsMng s 
Mooter Directory of several Disks, sad sorting, selecting, 
updsting, snd printing psglnsted listings of thess fllss. A 
BASIC Craee-safsreseB Prograa, wrlttan in Asseably Language, 
which provides an I-fief Listing of the Vsrlsblss and Reserved 
Words Id T*C 11110, XaaolC, aod rllliaWLLB BASIC Prograaa. 

ALL Utilities Isilmdl Be wares - (either BASIC or A, I. Source Coda). 

F snd CCF - $50.00 

■ASIC Utilities OmXT for OmlFlZX — SJO.OO 



cnmmunicHTions 



ill 



CMOOEM Talecommunteetloas Profrea froa Ceepmter Syitaet 

Coaaaltaats, lac. — Nenu-Oriven; supports Dumb- Teralnal Mode. 
Upload and Download In non-protocol mode, and the CP/M *Modea7* 
Chrlstensen protocol mode to enable communication capabilities 
for almost any requirement. Written In "C". 

FLEX, CCF. OS-9, UntFLEX: with complete Source - $100.00 

without Source - $90. 00 

XDATA from Seathoatt Madia — A COeWUBICATIOR Package for the 
UelFLLI Operating Systea. Use with CP/M, Main Frames, other 
UnlFLEX Systems, etc. Verifies Transmission using checksua or 
CRC; Re-Transmits bad blocks, etc. U - $f*i.H 



[EH1T1E 



RAPIER - 6809 Chess Prooraa from Soataeast Media — Requires FLEX 
and Displays on Amy Type Teralnal. Features; Four levels of 
play. Swap side. Point scoring system. Two display boards. 
Change skill level. Solve Checkmate problems In 1-7-3-4 moves. 
Make move and swap sides. Play white or black. This Is on* of 
the stroalest CHESS prograas running on any microcomputer, 
estimated USCF Rating 1600* (better than most 'club' players at 
higher levels). F and CCF • 179.95 
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for information 
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CoCo OS-9"" FLEX" 

SOFTWARE 




SCR.EOITOR III froa V1 ad rash H1cr« Syitaas -- Powerful Screen- 
Oriented Ed< tor/word processor. Alaost SO different coaaends; 
over 300 pages of Documentation with Tutorial, Features Multi- 
Coluen display and editing. "declael align" ioIiwi (AMD add thea 
up autoaatlcally). Multiple keystroke aecros, even/odd page 
headers and footers. Imbedded printer control codes, all 
justifications, "help* support, store cosraan coaaend series on 
disk, etc. Use supplied "set-ups', or reaap the keyboard to 
your needs. Except for proportional prtntfng, this package will 
00 IT AIL! 

6800 or 6B09 FLEX or SSB DOS. OS-9 - $175.00 

•TTLO-CXAFI froa Craat Plaiee Ceapatar Co. — A full-acraan 
orleated WOtO PROCISSOR — (uaaa the 51 » 24 Oi.play Screen. On 
CoCo FLIX/STAR-DOS, or PIJ Wordp.k). Full ecreea dl.pl. y and 
adltlng; eupporta the Daley Urwtol proportional printers. 

arw riicM — > ccc and ceo - >m.is, f or o - i 179.93 , u - srw.is 

OTTlO-RPBll (rea Craat FLalaa Ceapatar Ca. — Faat Coaputar 
Dictionary. Coapleaeota Stylograph. 

> CCF and CCO - S»».15, F or - j W.W , U - i 149.93 

froa Cceat PUlaa Caaaatar Ca. — Harg. nailing Uat to 
Lattera, Print aulclpla Fliea, etc., through Stylo. 

-> CCF and CCO - 559.95. t or - $79.93, U - SI79.9» 



JUST froa Saatheaat Madia — Text Foraattar developed by Ron 
Anderson; for Dot Matrix Prlntara, provide, aaoy unique featuraa. 
Output "Foraatted" Tl>>( to lha Olaplay. Uae the FreinT.CHO 
supplied for producing Multiple coplea ol the "Formatted" Text on 
the Printer INCLUOINC UtIIODCD FUVTXI "—.ana („,,, ueeful at 
other tlaea alao, and worth the price of the prograa by Hull). 
"Uaar Configurable" for adapting to other Prlntera (coaea aet up 
for Epeon NX-BO with Craftrax); up to tan (10) labedded "Printer 
Control Coaaanda". Coapanaatea for a "Double Width" printed line, 
lacludex the normal Una width, aergln. Indent, paragraph, apace, 
vertical skip llnee, page length, page auaherlng. centering, till, 
Justification, etc. (lea with PAT or eny other alitor, 

* Now aupplled aa a two disk aet: 
CKsk II: JU5T2.CMD object 111.. JUST2.TXT PL9 aource: FLU - CC 
Dtak II: JUSTSC obj.ct and source In C: FUtl - OS9 - CC 

The JTSC and regular JUST C aource are tuo aeparate 
prograaa. JTSC coapllea to a varalon that expecta TSC Word 
Proceaaor type coaaanda, C.pp .ap ,ce etc.) Crest for your older 
text files. 

• anmaB •• 

Ada ii a. i. a. 

(ale. tl.SO) 

Add 3X Surface r.nlaa 




The C aource coapllea to a stsndsrd aynt.x JUsT.CMD 
object file. Ualng J0ST ayntax (,p .u .» ate.) With all JUST 
functions plue .evor.l additional printer formatting functlona. 
Reference the JUSTSC C aource. For thoae wanting an excellent 
gUOCIT PRJCKD word proceaaor. with feature, none of the other. 
ban*. Thle la 111 

Dlak (1) - PL» FLEX Version only - P t CCF - $49.11 
Olak Set (!) - f I CCF t OS9 <C version) - 369.95 



O 



SPELL! "Coaputer Dictionary" froa 5** thee it Nreia - 0TH 120,000 
sards) Leak ap a eara froa within your Editor or Word Processor 
{with the SPM.cJlO Utility which operates In the FLEX IPCS). Or 
check and update the Text after entry; ADD uOKDS to the 
Dictionary, "flag" questionable words in the Text, "View a word 
In context* before changing or Ignoring, etc. SPEllB first 
checks a "Coaaon Word Dictionary*, then the noraal Dictionary, 
then a "Personal Word List*, and finally, any 'Special word Ltst" 
you nay have specified. SPELL! also allows the use of Saall Oftk 
Storage syateai. 



ft SPECIAL LOTTO) TUB OPFIB fl 



F and CCF - 599.95 



DHTHlBBSEfaflCCOUnT.nG 



IMS froa Westchester Applied oetleeil SystaH •• Powerful 09»S: 

K.L. prograa will work on a ftaglf tided f dirt, yet Is F-A-S-T. 

Supports Relational. Sequential, Hierarchical, and Randoa Access 

File Structures; has Virtual Keeory capabilities for tint Data 

Bases. toatS Incl I provides an "entry level" Systea for defining 

a Data Base, entering and changing the Data, and producing 

Reports. IMS Laval II adds the POWERFUL "CEKMTE" facility 

with an English Language Coanend Structure for manipulating the 

Data to create new File Structures, Sort, Select, Calculate, 

etc. IONS Letal III adds special "Utilities" which provide 

additional ease In setting up a Data Rase, such as copying old 

data Into new Data Structures, changing Systaa Parameters, etc. 

(IMS SystM Waul - IM.M ISTS 1*1 I ■ F 1 CCF - tl».*5 

IONS lei II - F 1 CCF - 1199. 9S 

ttMS Lei III - F t CCF • 52*9.95 

ttCSUeTTet PaOJaZS — Craat Plalas Caaaatar C«. and larharMl Oata 
ftsseertlt. lac. both have Oata Base and Business Packages written 
In TSC XBASIC for FLEX, CoCo FLEI. and MFUX. 



miSCELLflnEOUS 



lOt Air f«Tflp 



" FlE X is ■ irKfemjylTi of Tecl^tittftl Syslcms Consultant* 
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TAIULA IASA SPREADSHEET from Coaputer Syiteai Consultants -- 

TABULA RASA (s slailar to DESKTOP/PLAN; provides use of tabular 
coaputa tlon icheaes used for analysis of business, sales, and 
econoalc conditions, Menu-driven; extensive report-generation 
capabilities. Requires TSCi Extended BASIC. 

F and CCF, U - $50.00. w/ Source - $100. M 

OTkACALC froa Computer Sri teal Center — Electronic Spread Sheet 
for the 6B09. 

r. S»eCUl CCF and OS9 - $200.00. U - JJ9S. 00 

FULL SaaXEl imiTOrj/MV> froa Cexawjter Systaas Cornel tax tl - Use 
the Full Screen Inventory Sys tea /Hate rials Requirement Planning 
for aalntalnlng Inventories. keePs Ilea field file In 
alphabetical order for easier Inquiry. Locate and/or print 
records aatchlng partial or complete Ilea, description, vendor, 
or attributes; find backorder or below stock levels. Print-outs 
In itea or vendor order. mRP capability for the aalntenance and 
analysis of Hierarchical asseablfes of Iteas In the Inventory 
file. Requires TSCi U traded BASIC. 

F and CCr. U - $90.00. w/ Source - $100.00 

FULL SCREE! PUILIIC USE froa Caveator Systems CaaulteaM - The 
Full Screen Hailing List Systea provides a aeans of aalntalnlng 
staple aalllng lists. Locate all records aatchlng on partial or 
coaplele name, dty, state, tip, or attributes for Listings or 
Labels, etc. Requires TSCi U tended BASIC. 

F and CCF. U - $50.00. w/ Source - $100.00 

91ET-TRAC Forecaster froa Southeast Mil — An XBASIC Prograa 
that plans a diet In teras of either calories end percentage of 
carbohydrates, proteins and fats (C P Ctl or graas of 
Carbohydrate. Protein end Fat food exchanges of each of the six 
basic food groups (vegetable, bread, aeat, skla atlk, fruit and 
fat) for a specific Individual. Sex, Age, Height, Present Height, 
Fraae Sue, Activity level and 3a sal Metabolic Rate for noraal 
Individual are taken Into account. Ideal weight and sustaining 
calories for any weight of the above Individual are calculated. 
Provides nuaber of days and dally calendar after weight goal and 
calorie plan l< deterained. 

F - JS9.9S. U - SM.es, 
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C267 64 

C29B 7* 

C» 20 

C2C3 6? 

C2C7 20 

C2CB W 

car « 

cac 6<> 

C3D7 OA 
C3B6 7A 

rac 20 

C2» M 
C2E4 72 
C2» 6£ 
C2EC 65 
C2F0 7? 
C2F 4 20 
C2F8 66 
C2FC 6£ 
C3O0 61 
C304 61 
C308 60 
C30C 68 
C310 74 

Q14 20 
C31B 20 

C31C7J 
C320 61 
C324 30 

era 6t 

C32C 72 
(330 65 
C334 72 
C338 20 
C33C 65 
(340 72 
C344 2? 
(34B63 



20 62 65 

74 77 tf 

64 69 67 
74 73 K 
77 6? 74 
20 61 20 

65 61 64 
tf 67 00 

65 72 6F 

60 61 tf 

61 74 6F 
7? 20 6F 
20 74 66 
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The Reaet Pin 

The Reset pin on the MC68HC11 U both an Input ind an 
open-drain output. As an input this pin la used to force an 
orderly restart sequence for the MC68HC11 MCU. As an output 
this pin allows the MC68HC11 to generate a reset signal to 
the external system in response to an Internally sensed 
condition. 

There are three condiHona wldch can cauaa the MC88HC11 

to generate a low true reset output signal. The Internal 

systsms which can cause reaet will be described in greater 

detail later In thia article. Power On Reset (POR) lnternslly 

ssnsss Initial application of Vdd power to the MCU . In turn 

POR generetaa an internal signal to lnitlaliie the MC68HC11 

and drives the reset pin low for e short period. In some 

cases this reset output signal can be uaed to reaet the 

external aystem components. The MC68HCU contains an Internal 

circuit to sense the epeed of the system clock. In the event 

of a missing or stow clock this "Clock Monitor" circuit can 

optionslly force s system reaet. Also included in the 

KC68RC11 la s Computer Operating Property (COP) wetchdog 

eyetem. Software 1* responsible fox res* ting this wetchdog 

periodically to prevent it from ever timing out. If the 

software fails and this wetchdog times out. s low true reset 

output can be generated to reset the external ayatam aa well 
aa the MC68HC11. 

The open drain output capability of the reset pin posse 

tome new problems for the user In terms of the external 

circuitry thst can be connected to this pin. For stsrtsrs. 

the traditional Urge time conetent R-C circuit shown in 

figure 1 cannot be used on the MCS8HCU beceuee the open 

drain reset driver is likely to be damaged trying to 

discharge the lerge external capacitor (Cl). In fact an even 



store subtle problem is presented by the internal mechanism 
which distinguishes which condition wsa responsible for the 
reset signal. 

Determining The Ceuae Of Resst 

Since there are seversl possible conditions which csn 
csuse reset in the MC68HC11. e mechanism hsa been Included to 
differentiate between e power on reset or external reset 
request, s clock monitor reset, or s COP wstchdog reset. Each 
of these three types of reaet hsa a seperste reset vector 
which determines where execution will begin following the 
reset. Figures 2a and 7b ahow the eequence of eventa in the 
differentiation process. 

In figure Za an internet source csused reset (either the 

olock monitor or the COP wetchdog). An interns! reset 

ssquence is started where the COP and clock monitor atetue is 

temporarily latched and the Internal open drain driver forces 

s low level on the reeet pin. All Internal ayatems are 
Initialled including the COP and clock monitor systems which 

is why their status wsa latched et the beginning of the 

sequence. Four E clock cycles later the open drain driver 

releesee the reset pin. Two more I clock cyclea later the 

reeet pin la sampled and in this case It is found to be high 

so an Internal ayetem ia aaaumed to hsve ceussd the reset. 

The condition of the tetched etetus of the COP end clock 

monitor systems vrttl determine which reset vector will be 

used. 

In figure 3b some external source pulla the reset pin 

low asynchronously. An internet sequence is Initiated which 

drlvee the reeet pin low with the internet open drain output 

driver. After lour I clock cycles the open drain driver 
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releases the reset pin but In thia case It is still held law 

by the external source. Two E clock cycles lster (six cycles 

since the sequence begen) the reset pin is sampled to see If 

It ts still low. Since it Is. the source which ceused this 

reset la assumed to be external. The internal differentiation 

sequence la complete «t this time but the reset condition 

win remain until the external source releases the pin. Note 

In figure 2b that although the external pin is released 

asynchronously, the internal reset is releesed synchronously. 

Several ruins about the use of the reset pin csn be 

derived from the sbove discussion. First an external reset 

must hold the reset pin low for more then seven E clock 

cycles in order to gusrsntee thst it ts distinguishable from 
s simultaneous Internal request from the COP wetchdog or 

clock monitor systems. Second the circuit externally 

connected to the reset pin muet not prevent the pin from 

rising fiom Vss to logic one in less than two E clock cycles. 

If the capacitance connected to the pin is large enough to 

delay the rise, the Interns! circuitry will erroneously treat 

reset requests from the COP wetchdog and clock monitor 

ayeteme as externally requested resets. Finally, any time 

reset is detected low it will remain low for s minimum of 

four I clock cycles. 

The Internal Power On Reset (POR) 

The power on reset (POR) circuit In the MC68HC11 was 

prUsarUly Intended to Initialize Internal circuitry. In some 

Cases this function msy be used instead of sn external system 

POR. When Vdd rises to sbout 1 volt the jntemel POR 

triggers. The open drain driver st the reset pin pulls the 

pin low for just over four thoussnd E clock cycles. At the 

end of this delsy reset is releaaed. If the Vdd power supply 

has not reached a legel level by this time the Intemsl POR 

should not be used for syetem stsrt up. Common power supplies 

can be expected to have riae times on the order of 100 

iillr* — mtls . Even when the power source Is s battery . the 

power ewltch could bounce for 40 to 100 milliseconds. The 

typical MC68HC11 aystem Is expected to operate with an E 

clock frequency of IMHi or MHt so the duration of the 

internal POR delay would be sbout 4 a&Qseosnds or 2 
mmUeamda respectively. For these reasons most MC68HC11 

systems wul need some external circuitry to desl with the 

power on reset problem. 

Some Suggested POR Circuits 

Any external circuit connected to the reset pin of the 
MC61HC11 should be capable of actively pulling the pin tow to 
generate e reset but must also allow any other device to pull 
the pin low st any time. In addition no significant 



cspscitance should be connected to the pin beceuse the pin 

must be sble to rise from ground to logic one in less than 

two E clock cycles. 

Figure 3 ts s vsrlatlon of the trsditionsl reset circuit 

of figure 1 except s diode is sdded to isolate the large 

capacitance of C'l from the reset pin. An additional resistor 

(R2) is needed at the reset pin. In some cases this circuit 

will still be unsuitable frees use the POR snd manual reset 

switch no longer pull the system reset all the way to Vss. 

The diode drop would be about 0.7 to 1 volt for a silicon 

diode. Although s lower drop can be obtained with s germanium 

diode, those devices are more difficult to find and are not 

usable at Idgti ambient temperatures. The worst case ona volt 

level for logio zero on reset Is acceptable for an HC68HC11 

operating st Vdd equal 3 volte but most available peripheral 

devices require TTL compstible Input levels (logic leas 

than 0.7 volte). Even tha MC68HC11 requires s logic zero less 
than 0.6 volte if it is operating with Vdd equal 3 volts. 

Figure i uses an NPN switching transistor which corrects 
the poor logic level of figure 3 but requires another 
resistor (R3> to keep CI from charging through the 
base-emitter Junction of 4)1. Figure S substitutes an 
N-ehannel MOSFET for the NPN transistor In figure 4. The base 
resistor (R3) of figure 4 Is not needed in figure S. 

Figuie t Is s more elaborate circuit based on an 
MC14007UB. Thla circuit will provide e cleaner signal with 
faster rise time st the reset pin because of its much higher 
gain than the single transistors of figures 4 or S. The 
switching point for the Input signal from the R-C to pin 6 of 
the MC14007UB Is mid supply srAmore predlctsble over 
operating conditions than the switch point for Q 1 In figures 
4 or 5. The flexibility of the MC14007UB allows the second 
Inverter to be connected to functlonaa sn open drain driver 
(pine 1 and ] unconnected). 

The Internal Clock Monitor System 

The internal clock monitor system can be configured to 

generate a low true reset output if an absent or slow E clock 

is detected by the clock monitor hardware. The trip range is 

between 10 and 200 micr os econds depending on processing and 

operating temperature. A clock frequency above lOOKhz is 

guaranteed not to be detected as s Clock failure. A clock 

frequency below SKHz or absence of a clock for more than 200 

microseconds ts guaranteed to be detected as e clock failure. 
Because there era cases where It may be Dorms) for the E 

clock to be slower than SKHa or sven stopped during long 

standby periods, a software socesslble control bit (CMS) 

allows the clock doaIIOt function to be ensbled or disabled 
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depending on the application. 

Nott that an E dock U required to execute the nut 
differentiation sequence but not to force the MC68HC11 Into a 
reset condition. If the clock monitor la being used to 
monitor errata! operation and the oscillator fejla. It Is 
likely that the MCU Mill simply aaeuae e reeet condition but 
not proceed with the differ* ntletlon and reettrt •equenc* 
because the "— ^ 1 '«'"^ la not running. If there is external 
dock control circuitry to allow Interface to alow or 
asynchranooa peripherals, the deck monitor function can be 
used to detect a peripheral •cease failure and the reset 
output can be used to reetart the external clock control 
logic, In this latter case the operate clock monitor reset 
vector could direct control to e routine which retried the 

The Internal COP Watchdog Syatem 

The MC89BC11 Includee e Computer Operating Properly 

(COP) Watchdog eyases) to help protect against software 

failures. In order to use e wstchdog timer the application 

oust be such thst s very special watchdog reset sequence can 

be execUtell on a regular periodic basts such thst the 
watchdog timer la never ellowed to tlma out. Although moat 

software dladpines encourage or et least permit the 

wetchdog eyeteo concept, there la no genersl agreement on how 

long the time out period should be and some programs even 

eOow long daisy or wait loopa during which thare la no 

opportunity to execute the wetchdog timer reset sequence. In 

ordar to make the MC6IHCU compatible with aa many 

appUcatlona as possible, the Internal COP wetchdog syatem 

Includee epedai control blta wtuch permit specification of 

one of four time out periods and even ellow the function to 

be dlseblad completely. 

Since the COP wetchdog function relies on the syatem E 
clock in order to detect e software failure, it followa thet 
the dock monitor ayetem described sbove should also be 
Included to guard against clock failure. When the COP syatem 
la enebled the clock monitor syatem would normally also be 
armed since the COP wetchdog cannot operete without the E 
clock. 

The control bit which eneblea or disables the COP 
wetchdog system Is Implemented In an EEPROM cell to protect 
ayetem Integrity. Since the watchdog function is Intended to 
detect software failure! It la not appropriete to require 
eoftwere to eneble the function and It la not appropriate to 
aDow arronaoua software to accidentally disable the 
function. By implementing tide control bit In an EEPROM cell 
both of these requtrementa are met. Prior to use in s flnsl 



application, the EEPROM control bit le programmed to dther 
enable or disable the COP function. Prom then on whenever the 
MCMHC11 is powered up or reset, the COP wetchdog Is eithnr 
present or not as if the pan had been custom manufactured to 
either heve or not have the COP wetchdog function. The 
programming proceedure to chenge the atate of the COP eneble 
control bit la complex enough to aa&ure that It would not 
"eccidentally" be reprogrammed by erroneous software. As an 
addltlonel safeguard e new velue in this control bit has no 
affect on the COP wetchdog eystem until after e subsequent 
reset aequence so the application aoftware could check for 
the desired state during initialization software to 
completely protect egelnst eccldental changes. 

Two additional control bite determine the time out 
duration baeed on the oacillstor frequency. The four rates 
for e 2MHi E clock frequency are 16.38 milliseconds, 65.54 
milliseconds, 262 milHsecon da . and 1.05 seconds. The two 
control bite which select the tlma out period may only be 
written to once following • reset and that write must occur 
within 64 E clock cycles or it will not be honored. This 
protection is Included to prevent arrant software from 
changing the wetchdog time out period accidentally. 

in order to prevent the wetchdog from timing out 

aoftware muat perform two seperete write Instructions to a 

control register location (COPRST) with specific values of 

date for eech write. First hexldedmel 55 la written to arm 
the COP timer reset mechanism . Next hextdedmal AA is written 

to actually reeet the timer. Any number of Instructions msy 

be executed between these two writes but both must be 

executed In correct order prior to explretion of the COP time 

out period in order to evold e complete syatem reset. If the 

timer is ellowed to time out, e aaperete reset vector will be 

used to differentiate e COP reset from e clock monitor reeet 

or en external reaet requeet. 

A Pinal Comment 

The MC66BC11 has new cepeblllrlea associated with Ita 
reset pin which offer new posaibUitlaa to the end user. The 
Integration of clock monitor and watchdog ayatems greetly 
enhance system Integrity end eliminate the need for the end 
user to implement these functions in external circuitry. At 
the same time the designer must become familiar with new 
Interface requirement a for the reset pin. This article has 
presented boom examples of power on reset dreulta which are 
compatible with the MC68HC11. The actual function of the 
internal systems which affect the reset pin heve also been 
described to aDow a designer to develop other dreulta which 
would beet St e particular application. 
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The Fast Fourier Transform And Its 
Implimentation On fl Small Computer 

James H. Crass Jr. 

4930 New Castle Rd. 

LouielUnlie. Ohio 44436 
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Dear Mr. Williams, 

Recently there has appeared In several computer 
ub I teat Ions questions about the Fourier Transform and 
ast Fourier methods. I have noticed that Mttle 
Information has appeared In the "popular" press on this 
subject so ' sought to remedy this situation. Enclosed 
Is an article on the Fast Fourier, some programs for 
example and benchmarks on three methods of Fourier 
analysis. I have also Included In the article a list of 
references . These references where chosen carefully, 
with consideration given to oversees readers who may 
not have access to more obscure American technical 
Journals. 

Although I use Lucldeta Pascal for most of my 
programming, I feel that Introl's C ver t.5 would be a 
good choice If real time applications were to be 
considered. If reel time Is not required even BASIC could 
be used. The point Is that the alogrtthms In the article 
can be adapted to Just about any language and 
application. 

Some of the applications that I found while researching 
this article are In the areas of agriculture, statistics, 
medical research, xray Imagery, signal processing and 

ma ny more . 

In closing I would like to say how much I enjoyed the 
articles on the SBCs that you are running. Now all we 
need Is Turbo Pascal for our systems. I was glad to see 
that someone has picked up Data Systems '68 line of 
boards. I have three (cpu, 64k Oram, Dualport) and think 
highly of them. I have completed the harddlsk Interface 
from Devtd Graves and Installed a harddlsk on my system 
(works great). 

Sincerely, 

Jamas H. Gross Jr. 
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The Discrete Fourier Transform 
The Discrete Fourier Transform (DPT) of a set of data 
points sampled In time f (k) , can be represented by the 
equation: 



N-l 

1 <T> 

X(M) •" •, HM*«*!-j2»pi*M»K/H) (1) 



M 



k-0 where, 1*0,1,2,. . .N-l 



x(M) represents a discrete spectrum, with M being the 
number of the harmonic frequency. The f(k) is the set 
of discrete time domain samples, and k is the nurtoer 
of the data sample. N Is the number of data points. 
Bracewell provides a very complete set of graphical 
solutions. (Bracewell, 1978) 

What the OFT does Is to take a series of discrete data 
In time and transforms It Into a discrete series in 
frequency. Results from Euler's equations show that: 
e'(-jx) - OOS(x) - jSIN(x) . Tills result will allow the 
statement, e* (- j2*pi*m*k/N) in (1) to be replaced 
with: CCS(2*pl*m*k/N)-jSIN(2*pl*in*k/N). Placing this 
result back Into (1) we get: 

N-l 

i <n 

X(H) - - ) f(k)»(COS(2*pi , M*k/N)-jSIN(2*pl*K»k/N) 
N '-' 

k«e where, K*0,l,2, ...N-l (2) 

Which shows that the EFT of tlie sample data point is a 
sum of sines and cosines, i.e. that X(H) Is a complex 
sum. (2) can be split into it's real and imaginary 
parts giving Uie general form for computer simulation. 
The real and imaginary parts of (2) maybe written as: 



N-l 



X(H) 



.re - - V f(k) 



0os(2*pi*M»k/N) 



k-0 



N-l 



X(K) .im 



: 2 - tw 



SIN(2*pl*M*k/N) 



(3) 



(4) 



k-0 wtiere, n*0,l,2,...,N-l 



From equations (3} and (4) the relation of each X(M) , 
to the summation of the sine and cosine (for all N-l 
data points) series can be seen. The computer program 
to find X(H) , H*0,l,2,... ,N-1 , Is presented in the 
Pascal language. This language is algorithmic in 
orglnlzatlon so that translation to BASIC or FORTRAN 
Is quite easy. 

PROGKAM fourlertransform (input, output, printer) ; 
(This program computes the fourler series given in GO. 
(3) and (4)) 
CONST (Define system constants) 

pi - 3.14159265 ; 
n ■ 2S6 ; (Nmber of data points) 
TYPE 

complexvar « RECORD (Some variables will have an 
Imaginary part) 

re : REAL ; (and * real part.) 

in : REAL 

END ; 
VAR (Define the variables used in the whole program.) 

printer : FILE OP CHAR ; (Pascal's way of outputing 
to a printer) 

x : ARM* [0..n] OF REAL ; (Tine domain data points) 

a : ARRAY [0..n] OF complexvar ; (Results of ECU. 
(3) and (4)) 

sum : complexvar ; (Summation variable) 

j,k i DJTJEER ; (Index variables) 



PROCEDURE lnputfunctlon ; (Define the Input data 

points) 

(A 12. 5% square pulse is defined as the Input 

function) 

VAR (Define the variables used only in this procedure) 

1 : INTeCER ; 
BEGIN (lnputfunctlon ) 

FOR i :- TO (n DIV 8) DO (define a 12.5% pulse) 
x[i) :■ 1 ; (input a real set of data) 

FOR i :- (n OTV 8) TO n 00 
X[i) :- ; 
END ; (inptitfuctlon) 

PROCEDURE scaleinptit ; 

(Procedure to perform the 1/n operation) 

VAR 

i : INTEGER ; 
BEGIN [scaleinput] 

FOR 1 :- TO n DO 
xtl) :- x(l)/n } 
END ; (scaleinput) 

PROCEDURE fourler ; [Perform Equ. (3) and (4)) 

[A procedure to compute the Discrete Fourier 

Transform) 

BEGIN (fourler ) 

FOR j :- TO (n DIV 2)-l DO 
BEGIN 

sum. re :■ ; sum.lm :■ ; 
FOR k :■ TO n-l DO 
BEGIN 

sum. re :- sum. re* (x[k) * COS(2*pl*j*k/n)) ; 

(Real) 

sum.lm :- sum.lm ♦ (-x[k) * SIN(2*pl*j*k/n) ) 
(imaginary) 
END ; 
a[j) .re :» sum. re j 
a[j) .im :« sum.im 
END 
END ; [fourler) 

FUNCTION mag(x,y : REAL ;) : REAL ; 

(A function to combine the real and imaginary parts) 

BEGIN (mag) 

mag :■ (SQRT(9CR(x) ♦ SQR(y))) 
END ; {»>»g} 

PROCEDURE output ; 

(A procedure to output the results) 

VAR 

i : INTEGER ; 
BEGIN (output) 

FOR 1 :- TO (n DIV 2)-l CO 
BEGIN 
WRlTElN(printer) ; 

(Output in the format m real Imaginary 
mag ] 

WRITE (pr inter, i:3,' ' ,a(i] . re:ll :8, ' 
',aU) .im:ll:8,' ') ; 

WRITE(printer,mag(a[i) .re, all] .ira):ll:8) ; 
END 
END ; (output) 

BEGIN (fourlertransform (WIN) 

(Put all the procedures and functions together to make 

a program) 

REMRITE(prlnter) j (How Pascal outputs to a printer) 

lnputfunctlon ; 

scaleinput ; 

fourler ; 

output 
END . (fourlertransform NUN) 

example: N*64, Input a 12.5% poise: 

H REAL IMAGINARY MAG. 

0.12500000 0.0 0.12500000 

1 0.11473736 -0.04105368 0.12186085 

2 0.08713414 -0.07150914 0.11272053 
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3 


8.05057839 


-8.08438494 


0.09838187 


4 


0.01562500 


-0.07855218 


0.08009111 


5 


-0.00871736 


-0.05876765 


0.05941068 


6 


-0.01794186 


-0.03356686 


0.03806106 


7 


-0. 01315108 


-0.01191944 


0.01774891 


a 


-0.00000808 


-0.00000000 


0.00000000 


9 


0.01396832 


0.00068622 


0.01398517 


18 


0.02242B66 


-0.00680366 


0.02343789 


11 


0.02255346 


-0.01672679 


0.02807925 


12 


0.01562508 


-0.02338447 


0.02812426 


13 


8.00588815 


-0.02350683 


0.02423306 


14 


-0.00170706 


-0.01733206 


0.01741592 


15 


-0.00380687 


-0.00804894 


0.00890380 


ie 


-8.80000000 


-0.00000000 


0.00000000 


17 


0.00729514 


0.00345034 


0.00806994 


18 


0.01422405 


0.00140095 


0.01429288 


19 


0.01743385 


-0.00436695 


0.01797246 


20 


0.01562508 


-0.01044029 


0.01879203 


21 


0.01002565 


-0.01351803 


0.01683005 


22 


0.00363663 


-0.01198837 


0.01252781 


23 


-0.00032456 


-0.00660652 


0.00661449 


24 


-0.00000000 


-0.00000000 


0.00000000 


25 


0.00426484 


0.00470553 


0.00635066 


26 


0.01018240 


0.00544260 


0.01154570 


27 


0.01472053 


0.80218358 


0.01488160 


28 


0.01562500 


-0.00310801 


0.01593111 


29 


0.01251732 


-0.00750259 


0.01459357 


38 


0.00784384 


-0.00858196 


0.01110200 


31 


8.08281684 


-0.00563669 


0.00598664 



Where, M is the Pourier Series number, M=0,1 ,2, . . .N/2, 
REAL is the real part of x(M) , IMAGINARY Is the 
Imaginary part of X(M) , and MAC. Is the complex 
magnitude X(M) . The Fourier Series number M-0 
represents the D.C. component, M-l is the firt 
harmonic or fundamential frequency, M>2 is the second 
harmonic, all Che way up to M»(n DIV 2)-l which is the 
(N DIV 2) -lth harmonic. 

Example: N»64, input a 1000 Hz. sine wave. 

PROCEDURE lnputfunction ; 

{A 1000 Hz. sine wave is sampled at Che rate of .15625 

msec.} 

VAR 

i : INTEGER ; 
t : REAL ; 
BEGIN 

t :- ; 

FDR 1 :• TO n-1 DO 
BB3IN 

xli] := SIN(2*pl*1.0E3»t) ; 
t >- t + 0.15625 
END 
END | 



M REAL 

0.000000 

1 0.000000 

2 0.000000 



IMG 
0.000000 
0.000000 
0.000000 



MAG 
0.000000 
0.000000 
0.000000 



9 

10 
11 



-0.000000 

.000000 

-0.000000 



0.000000 
-0.500000 
-0.000000 



0.000000 
0.S00000 
0.000000 



30 
31 



0.000000 
0.000000 



0.000000 
0.000000 



0.000000 
0.000000 



The pure 1000 hz. sine wave produces a single value 
when the DFT is applied. This value is at M-10. The 
following equation was applied to determine the 
sampling interval: (see Stanley, 1978) 



1 



F - 



(6) 



i 
fs 



Where, F ■ the resolution in Hz. 

fs ■ sampling frequency in Hz. 
N = number of data samples. 

Communication theory requires that for proper sampling 
that the sampling rate be at least twice the highest 
frequency to be sampled. Thus for a resolution of 188 
HZ. the sampling Interval was determined by (6) Co be 
.15625 usee, when N=64 . 



The DFT has three problems which can plaque those who 
misunderstand what the approximation Involves. The 
three problems are aliasing, leakage, and picket fence 
effect. The aliasing effect Is Che effect of greatest 
concern in this presentation. The following example 
will demonstrate this effect. Given a pire sine wave, 
proper sampling rate, and significant resolution a DFT 
as seen In the previous example should be produced. 
But if the sine wave is outside the resolution of Che 
DFT Chen serious problems arise. 



Example: N=64, input a pure sine wave at 1050 Hz., as 
in Che previous example the resolution is 100 Hz. 



PROCEDURE lnputfunction ; 




{A 1050 Hz. sine 


wave sampled 


at the rate of .15625 


msec) 








VAR 








i : 


INTEGER ; 






t : 


REAL ; 






BEGIN 








t :■ 


■ ; 






FOR 


i := TO rt- 


1 DO 




BEGIN 






x! 


:i] := SIN<2* 


pi*1050.0*t) ; 






t := 0.15625E-03 + t 




END 








END ; 








M 


REAL 


IIC 


MAG 





0.027582 


0.000000 


0.027582 


1 


0.027858 


-e. 000000 


0.027858 


2 


0.028718 


-0.000000 


0.028718 


9 


0.111414 


-0.000000 


0.111414 


10 


0.323193 


0.000000 


0.323193 


11 


-0.313620 


-0.000000 


0.313820 


30 


-0.008965 


-0.000000 


0.008965 


31 


-0.008880 


-e.000000 


0.008880 



The OFT was not able to resolve the 1050 Hz. sine wave 
because the resolution was only 100 Hz. More data 
points in the sample and increasing the sampling rate 
would have corrected this, (see Bergland, 1969) 

The last property of the DFT to be examined is Che 
FOLDING effect. The folding effect stated as follows: 
For N data points the DFT of the points N DIV 2 to N 
are the reflections of the previous to N DIV 2 -1 
points. Therefore given N data points the DFT will 
produce only N DIV 2 -1 distinct values. This explains 
why when printing the results of the DFT program only 
N DIV 2 -1 points were printed. The reason for this 
effect is related Co Che fundamental properties of the 
DFT. 

The Inverse DFT 
The Inverse DFT of a sec of data points sampled In 
frequency X(M) , can be represented by the equation: 



f(k) 



N-1 



2 



M-0 



X<M)*«*{j2*pi*K*K/N) 



(7) 
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Following the development of (1) , (2) , (3) and (4) , 

the aquation (7) maybe evauated using the same program 

developed for the forward case by the change of a 
sign. 

the Fast Fourier Transform 
Once the DFT is understood and the computational 
burden of N~2 multiplications and additions seen, 
something better can now be introduced. The Fast 
Fourier Transform Is a computational method based on 
the factorization of the DFT matrices. (see Brig ham and 
Morrow, 1967) The purpose of the factorization is to 
Introduce Into the factored matrices ones and zeros at 
certian points. The selection of these points i.e. the 
location of the ones and zeros determines the type of 
FFT desired (see Cochran, et al, 1967). There are cwo 
types of FFT. The first type Is an "in-place* 
algorithm and the second is a "noo- in-place" type. An 
in-place FFT uses the same array to store the initial 
data points and the final results, thus saving memory 
space. The non- in-place algorithm requires a 
completely different matrix for data and results, this 
type requires much more memory. Examples of both types 
will be given. The in-place method has one other 
property and that is, the in-place method scrambles 
the final order of the data so thet a special routine 
is required to unscramble the data. The nxt-in-place 
does not do this. Therefore the in-place algorithm 
results in more complex programs but requires much 
less memory. The non-in-place algorithm has a very 
simple algoritlm but uses much more memory. 

Tl» Coo ley- Tukey FFT 
This is the classic FFT. Cooley and Tukey developed 
this method in 1965. The Oaoley-Tukey algorithm is the 
most widely used FfT method. This method is an in- 
place algorithm. 

PROGRAM FFT (input, output, printer) ; [Cooley - Tukey 
algorithm] 

CONST 

N - 2S6 ; {Set number of data points) 

NU - 8 ; [Power of two of the number of data points] 

pi - 3.14159265 ; 
TYPE 

complex • RECORD 
re : REAL ; 
lm : HEW. 

EKD ; 
VAR 

printer : FILE OF CHAR ; 
[a single array is used to store input data and final 
results] 

x : ARRAY [0..N] OF Complex ; 

PROCEDURE inputfunction ; 
[define a 25% pulse! 
VAR 

i : D/TEGER ; 
BEGIN 



FOR i 


:■ 


TO (N DIV 4) 1 


BEGIN 








x[l] 


.re 


:- 1 ; 




x[i) 


,1m 


:- 




EKD ; 








FOR i 


:» (N 


TO N 1 


BEGIN 








x[i] 


.re 


:- ; 




xUJ 


.lm 


:- 




EKD 








EKD ; 








PROCEDURE ac 


aleinput 


1 


VAR 








i : INTEGER ; 




BEGIN 








FOR i 


:- e 


TO N DO 




BEGIN 








X[i) 


.re 


:- x[i]. 


re/N ; 


x[i] 


.lm 


:- x[il. 


lBV/N 


END 









END t 

FUNCTION P2(X:IWnCER;) : INTEGER ; 
(look up table for powers of two) 
BEGIN 

CASE X OF 



1 


P2 


:- 1 ; 


1 I 


P2 


:= 2 ; 


2 : 


P2 


:= 4 , 


3 l 


P2 


:- 8 ; 


4 i 


P2 


:= 16 ; 


5 t 


P2 


:=■ 32 : 


6 : 


P2 


:- 64 ; 


7 j 


P2 


:« 128 j 


a i 


P2 


;« 256 ; 


9 i 


P2 


:= 512 ; 


10 : 


P2 


:- 1024 | 


11 : 


P2 


;- 2048 ; 


12 i 


n 


:« 4096 


END 







EKD ; 

FUNCTION bitrev(j,nu:IMT£CER;) :INTEGER ,- 

(the special routine needed to unscramble the results] 

(see Cooley, Tukey 1965] 

VAR 

i,m,)2,k : (OTEGER ; 
BEGIN 

m :- j ; 

k :- ; 

FOR i :- 1 TO nu DO 

BEGIN 

j2 :- m DIV 2 ; 

k :- k*2 + (m - 2*j2) ; 

m :- j2 

EKD ; 

bitrev s" k 
END ; 



[Cooley - Tukey algorithm ] 



PROCEDURE fastfourier 
(see Brigham 1974) 
VAR 

p,l,N2,NUl,l,k ; DmcER ; 
arg,c,s : R£AI. ; 
t : complex • 
BEGIN 

N2 :- N DIV 2 j 
NU1 :• NU - 1 j 
k ;« ; 

FOR 1 !- 1 TO NU DO 
BEGIN 
REPEAT 

FOR i :- 1 TO K2 DO 
BEGIN 
p :« bitrev(k DIV P2(NU1) ,NU) ; 
arg r» 2*pl*p/N ; 
c :- COS (arg) ; 
s :» SIN(arg) ; 

t.re :- x[k+N2].re«c «■ x(k+N2).lm«s j 
t.im :• x[k+N2].im«c - x[k+N2].re*s ; 
x[k+N2] .re j- x[k] .re - t.re ; 
x[k+N2].im :- x[k) .lm - t.im , 
x[k].re :» x[k).re + t.re ; 
x[k).im :■ x[k].im + t.im ; 
k :» k + 1 
EKD ; 
k :- k ♦ N2 ; 
UNTIL (JOT(k < N) , 
N2 :■ N2 DIV 2 ; 
NU1 :- Mil - 1 ; 
K :- 
EKD ; 

k :• B ; 

WHILE k < N DO 
BEGIN 

i :» bitrev(k,NU) ; 
IF i > k THEN 
BEGIN 

t.re :» x[k] .re ; 
t.im :• x(k] .im ; 
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IMAGINARY 



,x 1 i] .re:ll :B, ■ 



xtk] .re :■ x(i] .re ; 
x[k].ira :- x(i].im ; 
x[l) .re :■ t.re ; 

xji] .Ira :» t.im 
END ; 

k :« k + 1 ; 
END 
END ; 

FACTION HAG(x,y:REAL;) :R£AL ; 
BEGIN 

MAG :« SQRT(SOR(x) + 9QR(y>) j 
END ; 

PROCEDURE output ; 
VAfl 

1,1c : INTEGER ; 
BEGIN 

WRITElNtpr inter, CKR(121) ; 
lc !» 1 ; 

WRITELNtprinter,' M REAL 

MAGNITUDE ') ; 

FOR 1 :- TO (N DIV 2)-l DO 
BEGIN 

IF lc >- 60 THEN 
BEGIN 

WRITELNtprinter, CHRU2)) ; 
lc :- 1 ; 
END ; 

WRITE ( pr inter , i : 3 , ' 
',x[i].im:ll:8) ; 

WRITEIN (printer,' ' ,MAC(x[i] .re,x{i] -im) :11 :8) ; 
lc :- lc + 1 ; 
END ; 

WRITE LN( printer) 
END ; 

BEGIN (Oooley - Tukey MAIN) 

REHRITE(pcinter) ; 

inputfunction ; 

scale input ; 

fast four ler ; 

output ; 
END . [Cooley - Tukey MAIN) 

The Uhrich Algorithm 
This algorithm is a non-in-place type FFT. The Uhrich 
algorithm was first published in June of 1969. Tliis 
method results in very compact programs (see Uhrich, 
1969) . This process does not require a bit reversing 
procedure as in the Cooley-Tukey algorithm. 

PROGRAM FastfourierTransform (input, output, printer) j 

CONST (Uhrich algorithm] 

N - 256 ; [number of data points) 

NSTAGE ■ 6 ; (power of two of the number of data 
points) 

pi - 3.141S926S ; 
TYPE 

complex - RECORD 
re : REAL ; 
in : REAL 

END ; 
VAR 

printer : PILE OF CHAR ; 
(a two dimensional array is used to store input data 
and results) 

X : ARRAY (1..2.0..N) OF complex ; 

PROCEDURE inputfunction ; 

(A 2S.0» pulse is defined in this function.) 

VAR 

i : INTHSER ; 
BEGIN 

FOR 1 :- TO (N DIV 4) 00 

BEGIN 
xll.D.re :- 1 , 
x(l,i).im :- 

END ; 



FOR i :- 


(N 


BEGIN 




xll.i] 


.re 


xll.ij 


■ in 


END 




END ; 





(N DIV 4) TO N 00 



FUNCTION P2(X: INTEGER;) : INTEGER 
BEGIN 



CASE 


x OF 







t P2 


- 1 J 


1 


t P2 


- 2 i 


2 


P2 


' « ; 


3 


. P2 


- B ; 


4 


t P2 


- 16 ; 


5 


t P2 


- 32 j 


6 


: P2 


- 64 ; 


7 


[ P2 


- 126 


6 


1 P2 


- 2S6 


9 


t P2 


- 512 


10 


P2 


- 1024 


11 


P2 


- 2048 


END 






END ; 







PROCEDURE fastfourier ,- {Uhrich algorithm} 
VAR 

A,B,C,D,E,F, j,i,r,in2j : DmGER ; 

H : complex ; 

W,sinw,cosw : REAL ; 
BEGIN 

FOR j 5- 1 TO NSTAGE DO 

BEGIN 

FOR 1 :- TO (P2(j) DIV 2)-l DO 



BEGIN 




W :■ 2*pi/N ; 




in2j :- i*(N DIV P2(j)) ; 




cosw :- C06(W*in2j) ; 




sinw :- 5IN(W*in2j) ; 




D :« i*(N DIV P2(j)) ; 




F :- i*(N DIV P2(j-D) ; 




FOR r :« TO (N DIV P2(j))-1 


DO 


BEGIN 




A ;» r + D ; 




B :- r + F ; 




C :- r + F + (N DIV P2(jl) 


I 


E :« r + D + (N DIV 2) ; 




M.re :» x[l,C] .re*oosw ; 




M.im :» -x[l,C) .re*slnw ; 




x[2,A].re :- x[l,B].re + M 


re 


x[2,A].ira :• x[l,B].im + M 


im 


x[2,E) .re :- x[l,B].re - M 


re 


x[2,E).lra :- x[l,B] .im - M 


im 


END 




END ; 




FOR r :« TO N-l DO 




BEGIN 




x[l,r] .re :» x[2,r] .re ; 




xtl.r) .in :■ x[2,rl .in 




END 




END ; 




FOR r :- TO N-l DO 




BEGIN 




x[l,r).re :- x(l,r].re/N ; 




x(l,r).im :- x(l,r].lm/N 




END 




END ; 





FUNCTION KAG(x,y:REAL;):REAL ; 
BEGIN 

HAG :- SQRT(SOR(x)+SOR(y>) 
END ; 

PROCEDURE output j 
VAR 

i : INTEGER ; 
BEGIN 

FOR i I» TO (N DIV 2)-l DO 

SBC IN 
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WRITEUUprlnter) ; 

WRITE (printer,! :3, ' ' , x[l, i] . re:ll:8, ' 
' ,x[l,l].lm:ll:8) ; 

WRITEIprlnter," ' ,MAG(x(l,l) .re,xtl,i).im) ;11:8) 
QiD ; 

HRITELN(printer) 
END ; 

BEGIN [Fast Fourier Transform MMN program block.} 

REWRITE (printer) ; 

lnputf unction ; 

fastfourler ; 

output 
END . {fastfouilertransform } 



then store the values. Tt>e INPin' procedure could also 
be used to preprocess the sampled data, for such 
applications as convolution and autocorrelation. Tt« 
OUTPUT procedure could send data through a D/A 
converter, driving various display devices. 
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OFT 



N 


Tlme(sec) 


8 


.89 


16 


3.87 


32 


16.70 


64 


72.83 


128 


337.99 


256 


1731.22 


512 


10098.01 


1024 


» 58900. 00 


FFT (Cooley-Tukey algorithm) 


N 


Time (sec.) 


8 


.57 


16 


1.61 


32 


4.17 


64 


10.53 


128 


25.73 


2S6 


61.40 


512 


143.77 


1024 


391.82 


FFT (Uhi 


rich algorithm) 


N 


Tirae(sec) 


8 


.46 


16 


1.08 


32 


2.51 


64 


5.69 


128 


12.67 


256 


27.91 


512 


60.96 


1024 


132.11 



All timings are the average of three program runs and 
Include sampling time. 

Conclusion 
The developeoent of the Fast Fourier Transforms has 
reduced an unmanageable computational load to a level 
where even the small home computers can be used to 
solve meaningful problems. The purpose of this project 
was to develop* the FFT algorithm Into useful computer 
programs. The developeoent of the FFT programs was 
only part of this project. A third part that was not 
completed in time involved the Interfacing of the 
AMD9511 Arithmetic processor to the host computer 
system to further speed processing. The AMD9511 
arrived to late to allow software to be developed to 
use the device. It Is hoped that these programs will 
be a lielp to others who need these FFT methods. 

Note on Input-Output 
In most applications the INPUT procedure will call a 
machine Language program to read an A/D converter, 
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By Jon H. Larlaore 
5900 Arlington Blvd. 
Arlington, VA 22204 



Ken Drexler'e MEHCHD.SCR utility as published In the 
February 1986 Issue of 68" Micro Journal Is an lngenioue 
and useful combination of three memory-resident commands 
which edd convenience to FLEX. 

In experimentally lapleaentlng only Kan's "Repeat the 
Last Command" function, however, 1 dlacovered a problem 
which the few added lines of code below correct. 

As originally published, although Ken's "LC" command 
will, indeed, repeat the last command, it will not honor 
any optional command-line parameters which were entered 
with the original command. When "LC" re-executes a 
command such aa "CAT, 0. .TXT" , it will simply catalog the 
work drive. Ignoring everything past the comma. 

First, I would suggest changing the "/LC/" string st 
SF3CA In Ken's code to "/i./". Because the 
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repeat-command code ueed In thla utility muat erase the 
first lettera of the previous command In FLEX'a Input 
buffer, changing Che rapeat-coaaand code to a single 
letter will penile correctly re-executlng prevloue 
comaande which hed only two-letter names and which alao 
uee file naaea or other optional parameters, »uch aa 
"ED.TESTP1LE.TXT" (EDlt a file called TESTF1LE.TXT). 

Secondly, the reaaon Ken'a utility lgnorea the 
coaaand-llna optlona froa the prevloue comma ad appeara 
to be that FLEX'e Input buffer pointer Is not correctly 
"alaed" when the called program re-uses FLEX'S "GETPIL" 
routine the second tlae around. Adding theae three 
equatea along with replacing Ken'a code beginning at his 
"JUMP" label with that lleted below eeeas to fix It. 
(These ere 6809 aneaonlca. 6800 code would be a few 
llnea longer.) 



******************************************** 

* To correctly honor optional command-line 

* parameter! used In prevloua commands, add 

* this coda to Xen Drexler'a HEMCHD.SCR 

* utility as published In the February 1986 

* Issue of 68' Micro Journal, beginning with 

* his "JUMP" label. 



163, Freshneadow Drive, 
Ulllowdale, 



Ontario, 
M2li 2R2, 
Canada. 



* NOTE- Change the "/LC/" string at $F3CA 

* to "/L/". 

llnbuf equ $c080 Input line buffer 

bufptr equ $ccl4 Input buffer Index pointer 

nxtchr equ $cd27 Get next buffer character 

* Feaet Input buffer pointer for possible 

* command-line optlona 

* 

JUMP ldd 561nbuf Point to line buffer 

eddb 2 Point past "L(CR>" 

std bufptr Stora It 
get cut t Jar nxtchr Get next character 
bec getnxt Still alpha characters? 

Jap 0,x No, go re-run the prevloua pga 

RETRN jap HARMS 



end 



Bit Bucket 
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UNIVERSITY OF MAINE at Orom 



Barnm 
Dear Sir/Madam: 



SUnn HUI 

MM* I **« 



First, thank you for having aent me an examination 
copy of 68' Micro Journal (the February 1986 laaue). On 
the basis of It I would like to order a year'a 
subscription (a check for 24. 50 Is enclosed). 

I have a Radio Shack TRS-80 Model 16B which I 
originally bought aa a Model 12. I have v to use It In 
the Model 12 mode (Z80 chlo) using the CP/M-3 operating 
ayatea since t really do not need a multiuser system such 
aa Xenix. 1 would like to be able to utlllx« the larger 
memory I have with the MC68000 chip (5I2K), but I do not 
know of any operating ayatea I can use other than Xenix. 
Do you know if there la an alternate operating system for 
single users that haa a good selection of aoftware 
written for It that Is available for the Model 168? I 
understand that CP/M-68X la not available for the 16B 1 
would appreciate any information you could Rive me. 

Sincartly yours, 

Kueh H. Detfitt 
Frofttior of Zoology 
68' Micro Journal 



Dear Mr. Francisco, 

In answer to your question In 68' Micro Journal of 
January 1986, here Is one MC-10 user anyway, (alao a user 
of a 128k CoCo, a SWTPC 680U. a 'SUPEKCOCO' (68008 with 
256k which plu*s into the COCO-made by C1RPAC of 
MONTREAL, CANADA) and a few other odds and ends. It's 
true TANDY dropped the POCO like a lead brick (where do 
they find their marketing expertise?), I really wonder 
sometimes but there are at least two user groups in the 
U.S.A. which support the MC-10 well and have both 
Interesting articlea and growing Public Domain libraries, 
addresses and details at the end. 

I would be very Interested to receive a copy of the 
details of your 44k mod and ao would the newsletters I 
would think, plus anything else you have to offer for the 
MC-10. I enclose an addressed envelope plus $2.0 Canadian 
to cover postage aa 1 don't have any US stamps to offer. 
I am also sending a copy of this letter to Don so it may 
Inform other people about the clubs/newsletters. I am 
currently a subscriber to both and enjoy them very much. 
They typically publish BASIC Utility programs and games 
plus hints and articlea on Machine language Programing, 
neither is glossy but it's useful information. There are 
hardware articles from time to time, also. I can send you 
some varloua utillty/gaoe programs which are Public Domain 
on Caaaette If you wish, alao a list of MC-10 articles and 
references. I am off to Holland for the best part of 
January ao In February I could put some things together- 
Just now I am asking aure thla geta in the mail before I 
go! 

The MC-10 Newsletter, 

Attention Mr Joae Bray, 

4730 Caaa Street 

Ssan Diego, Ca 92109 

$6.0 US per year, 12 issues. 

The MC-10 Uaera Croup, 
Box 103, 
OUENSVILLE, 
IN 47665 

$10 US per year, 10 Issues- 
Larry E. Hainea, 
E 2924 Liberty Ave. 
Spokane, UA. 99207 

$5.0 US gets you the first 12 Issues of his 
newsletter, 'About ay MC-10' plus a 46 page software 
catalouge. 

Yours truly, 

Mike Fisher 



flh 



449B Yukon Court *2A 
Wheatridge, CO 80033 
February 7i 1986 

Don Ulill lams 

'68 Micro Journal 

5900 Cassandra Smith Road 

Hixson, TN 37343 

Dear Dons 

Re David Lands' s letter in the January ' 6B 
Micro (about C stack checking): 

A smaller (and faster running) may to fix 
the ■SOURCES/SYS/cstart.a" is to add the 
following lines after "_stkcheck leax dis": 

sts i — s save stack value for comparison 

cftPn ,!♦♦ and compare 

bh i fsterr if x is greater than s then 

• wraparound has occured 
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It can be very educational to decompile 
the C library into the original source code. 
Besides learning how the library routines work 
you can usually spot places where the code can 
be cleaned up. (For example, you can cut about 
3013 bytes out of printf Just by recoding it 
(without resorting to assembly language.) So 
far I've been able to decompile printf, atof, 
malloc (virtually identical to the example 
printed in the K&R C book), fopen, pffinit, 
pflinit and others. Coming up next: scanf. 

I was also able to modify cfloats_a (C 
assembly language library for floating point 
operations) to use the M6809 MUL instruction 
(rather than shifting) for the floating point 
multiply. Multiplies now run 3-4 times as 
fast (or 2-3 times faster (I wish some 
hardware and software companies knew the 
difference between "as fast" and "faster" when 
they advertised their products!)). 

If you don't have a program that lets you 
split the C library into its component modules 
(available from the OS-9 users' group) it's 
not too hard to write one using the source 
code for 'rdump* as a starting point. 

Thanks for printing a great magazine about 
a great microprocessor family. I get awful 
tired of the attitude most magazines take that 
the only computers out there are IBMs (and 
copies) and Apples. MS-DOS (CP/M with a bag 
on it) really does stink!! 

Sincerely , 

_ ' I . " r 7\, ^ 

Calvin Dodge 



<ul> and <dl> scroll Che text up (and down) by one line 
but leaves Che horizontal window as lc was. 

<nu>A and <nu>Z scroll down (and up) by half a screen. 
Again che horizontal window Is unchanged. 

Some unnecessary screen repainting In v2.1 (e.g. after CR 
and <)e> has been avoided - which speeds It up a blc. 

1 now force a complete repaint when screen updating has 
been aborted by pre-emptive keying. This ensures that 
the screen Is repainted correctly after a flurry of 
activity even If the last operation was one that normally 
does's require a complete repaint. 

]f a terminal has no reverse video marked text is 
displayed with spaces replaced by I. Better than no 
marking at all. 

How do we handle updates for existing customers? I am 
happy to provide a free update on return of the original 
disc, but the customer would have to put up with the 
International mall delays. Whatever you think best. 



Thanks for your efforts. 



Editor's Bote: The policy of S.E. MEDIA as to updates Is 
as follows. 

No charge within the first 90 days. Please enclose 
$2.50 for shipping/handling. 

After 90 days a flat charge of $25.00 per disk, for 
updates, ecc. Plus $2.50 S/h. 




CALCULUS CONSULTANCY 

Principal 

M.J.RANDALL Ph.D. 
8 NORTH TCE 
WELLINGTON 5 
Ph 759-825 

Dear Don, 

My falch In Ron Anderson has been more Chan Justified. I 
am naturally delighted with his review. I am honoured to 
have such compliments froa a competitor; he Is Indeed a 
man of considerable Integrity. 



1 was also pleased to receive ny first cheque, 
to have sales even before your announcement. 



Amazing 



All returned disk for updates require the original 
dlsk(s), unaltered, be returned) 

DMW 



DRTH-comp 



WWW® ftHILHASIl 

February 12, 19S6 

05-9 UolFLQ 

MBSTABG-0 20, 68020, 68881 AHD MOKE 

BANDS-OH KXFKSIZtfCE 



I enclose a disc with version 2.2. As a result of 
further comments from John Spray I have Improved the 
performance somewhat and added a few features. It has 
been under test here for a month or so and I'm fairly 
sure that It's OK. CONFICURE.CMD has been updated too 
to keep them consistent. The new documentation file CED- 
DOC.STY Is now In STYLOGRAPH format. 

New features are:~ 

If a new file Is specified on the call line It becomes the 
default file name for output. If the current text la 
deleted (or no file was specified on the call line) and 
text is Input from a disc file this becomes the default 
file name for output. 

<mu>F writes the test to the default file and returns 
without prompting to FLEX - this speeds up work on a 
single file. 



The DATA-Comp Division of Computer Publishing 
Corporation announces their new and innovative 8A0DS-OI 
68020 computer familiarization two day event. A chance 
to TH BEFORE TOD BUT] 

for two full days (Monday through Friday - excluding 
legal holidays) each participant will be furnished the 
exclusive use of a 68020 computer (MDSTAB6-O20). Each 
system will have available native C compilers, BASIC, 
aasembler and other high level languages. Each system 
will be equipped with the Motorola MC 68881 math co- 
processor, where applicable. 

Each demonstration room will contain not more than 
two work stations. Each system will be equipped with 
floppy disk, 20 megabyte Winchester technology hard 
disk, and 2 megabyte of RAH. RAM is partitioned as 
690K bytes of RAM disk and 1.2 megabyte of user RAM 
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■pace. 

Participants are encouraged to bring along any 
source level projects, for evaluation. In C, BASIC or 
assembler. Call for avalJlblUty of other HHLa. 

Although tbls la not a training seminar, Data-Comp 
personnel are available for assistance and 
consultation. This event Is scheduled for baads-on 
evaluations of the 68020 CPU, 6SSS1 math co-processor 
and MUSTANC-020 system, operating In a functional 
environment. 

Transportation to and from the airport and hotel/motel 
will be provided. Lunch provided both days. 
Chattanooga airport la serviced by American, Delta, 
Republic and other airlines. 

COST 

One person - $375.00 
Two persona - $595.00 

* Hotel single $22.00, double $26.00 
Includes satellite TV - convenient to food and shopping 

Syatema available for both 0S-9 and UnlPLEX. 
Reservation should be made 15 days la advance. 
Attendee should Initially Indicate 0S-9, UnlFLEX or 
both. Special facilities available on request. Plesse 
write or call for additional information. 

■OTS: Both 0S-9 and OnlPLEX are Unix type operating 
systems. Each aa been enhanced in some aspect or 
another. Prospective attendees should have some 
working knowladge or experience with one of these 
operating systems, to gain full benefit of the aeaslon. 
However, a newcomer will find that it la a simple mattar 
to be fairly proficient In using these systems in the 
allocated time. Special ayatem instruction available on 
request. Call or write. 

* Hotel/Hotel coat are aeparata coat, not included In 
the basic coat ahown. 
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New Programming language "QPL" 
by Compiler Products Unlimited 



QPL Is a high-productivity programming language which 
produces progrsms much more quickly and efficiently 
than commonly uaed languages. 

Programs can be written in QPL in one third the number 
of lines required by languages like Pascal, "C, Basle, 
Fortran, or Cobol. In addition to an Initial saving in 
program development time, QPL contains features which 
allow programs to be self adapting to data field alzes, 
thus saving on 'malntalnance programing'. 

*M 

Let's look at some of the reasona for QPL'a high 
productivity. 

Non-declarative language, all statements 'do work*. 

*«* 

Advanced arithmetic system, easier to use and more 
accurate than conventional floating point or fixed point 
systems. 

Conformant arrays accept mixed data types, reducing 
artificial barriers to problem-oriented programming. 

*** 

Pattern-matching based string processing slmpllfys text 
manipulations, and produces easy-t o-unde rstsnd 
programs. 



Automatic variable typing allows any variable to hold 
any type of data and any size of data. 

*M 

Simple branch and loop methods eliminate nesting errors 
and IF-ELSE errors. 

*** 

Simple file formatting methods automatically produce 
fully packed files for high space efficiency. 

*** 

Compact, highly readable syntax makes QPL easy to learn 
and use. 

*** 

What type of programming is QPL suitable for? 

QPL will save programming time in many types of 

programs. Including 

o Business data processing programs. 

o Computer sided Instruction programs. 

o Came programs (Adventure, etc) 

o Expert systems programs, and artificial 
intelligence. 

o Text processing and formatting; encoding and 
decoding. 

o High precision math programs. 

o Syatem utility programs (like sort programs, etc). 

o Industrial microcomputer applications. 
*** 

Now lets take a closer look at Juat two QPL features 
to see how they csn help programmers reduce program 
alze by three to one, and Improve productivity: 

ADVANCED ARITHMETIC: 

The arithmetic system of QPL is a dynamic-precision real 
number aystem. The effect It that computations produce 
EXACT RESULTS, not rounded results ss Is common in 
conventional floating point arithmetic systems. Also, 
the number rsnge is extremely wide (10 exp 32000) to 
(10 exp -32000) so that numerical overflow problems are 
greatly reduced. Dynamic precision meana that the 
internal repreaentatlon of a number has no fixed size, 
as it does in conventional floating point found in 
Paacal, 'C Fortran, Basic, etc. The lnternsl 
representation is adjusted in length as esch number Is 
created to produce an EXACT result. Of course, there 
are some operations whose results cannot be 
represented exsctly In decimal numbers. An exsmple is 

1/3 which produces 0.3333 For these cases, the 

rule in QPL is to csrry out the division for (D + N) 
places where D is the number of significant places in 
the denominator and N is the number of significant 
placea in the numerator. 

Summarizing the arithmetic system, it produces exact 
results in formats compatible with financial, 
engineering, and scientific needs. 

PATTERN PROCESSING: 

Psttern processing generally consists of two steps: 
Psttern crestlon snd psttern matching. To create a 
pattern which can be used to recognize four alternates 
we would write: 

ANIHAL - "CAT" 1 "DOC" 1 "HORSE" 1 "COW" 
To match this pattern of alternates to a string named 
OBJECT, we would write: 
MATCH(08JECT, ANIMAL) 

The Hatch function provides a Success / Fail indication 
which can he used to csuse conditional branching, aa 
well aa returning a value Indicating which alternate 
matched. 

*** 

By use of the pattern-constructor functions and the 
match function, strings csn be crested, taken apart, 
recognized, and synthesized from numbers, characters, 
and substrings. These abilities make possible quick 
solutions to many programming problems in ways which 
are eaay to design, becsuse the input data, 
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intermediate forms, and output data are in Che form of 

human readable strings. This casting of the problem and 

its solution in text form decreases the conceptual 

diatance between problem and solution, snd sllows 

better utllizstlon of human problem solving abilities. 

Numbers may also be manipulated by all the string 

functions, ss they sre automatically converted Co scrlng 

form when required, and back to number form when 

required for numerical Manipulations. 

• M 

QPL's easy-t o-learn features help programmers wrlce 

hlgh-qusllty programs quickly. 

*** 

Free brochure available with example programs. 

Demonstrstlon compiler I mini-manual SIO. 

Personsl version 5293, Business version $695. 

**» 

Call Compiler Products Unlimited, Inc, today Co place 
your order for QPL. Phone (602) 991 1657. Vina and 
Master Charge. 

SMI 

Or write to: Compiler Products Unlimited, Inc. 
6712 E. Presidio 
Scottsdale, AZ 85254 
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R.C.S. Microsystems Limited 

1*1 Uibrldos Road Hampton Hill 

Middlasax TWiJiBL 

Tel: 01-870. 220* T«l«»: 895H70 RCS MIC 

PRESS RELEASE 



NEW MODULE RANGE INCLUDES 0S9 DRIVERS 

R.C.S. MICROSYSTEMS announce the Modular 96 family of 
Eurocard microcomputer products from Measurement 

Systems. 

Modular 96 supports the powerful UNIX-like 0S-9 operating 
system giving multi-user, multi-tssking capability. 0S-9 
IS ROM-able and can be used in turnkey systems, both with 
snd without disks. 

The Modular 96 family includes s wide selection of ROM, 
RAv> and I/O functions including Disk, Parallel, Serial, 
isolated Parallel, IEEE, Analogue and Craphics Interfaces. 

A key feature Is thaC all modules In the ranee are 
supplied with r REE 0S-9 driver softwsre. This, together 
with wlde-ra-iglng support, including comprehensive 
d ocumen t s t Ion , regulsr tralnlns, courses and on-site 
consultsncy ensure rspld system design. 

SofCwsre development snd de-bug csn be csrrled out In the 
target hardware environoent with Systems 90 and 96, using 
Assembler, BASIC -09, C, PASCAL, FORTH, etc. 

More from: R.C.S. MICROSYSTEMS LTD. 

I4l, Uxbridge Rosd, 
Hampton Hill, 
Middx. TW12 1BL 



CESPAC INTRODUCES A 2 MEGABYTES DYNAMIC MEMORY BOARD ON 
A SINCLE HEIGHT EUR0CAMU, COMPATIBLE WITH THE C-64 BUS. 

MKSA, AZ, Janrary 8, I986 — GESPAC Introduces a two 
Megabyte Dynamic memory board built on s single height 
Eurocard of I00 by 160 sill lneters, snd compatible with 
the standard C-64/96 bus. he CESRAM-14 Is incended for 
use with any of the high performance processor modules 
available on the C-64/96 >us, such ss the 68010 bssed 
CESMPU-14, snd the 80286 based CESMPU-18. 



The CESRAM-14 is orgsnlsed ss 1,048,576 words of 16-blC 
wlch psrlty error detection. The bosrd operates 
ssynchronously on the bus snd offers ss access time of 
240 nsnoseconds. The CESRAM-16 uses s hidden refresh 
technique which makes it look like « ststic RAM to the 
processor snd Chus does noC slow down tcs operation. 

The CESRAM-16 Is fully compstlble with the large range of 
C-64 bus compatible processor, lnterfsce snd controller 
modules. The C-66 bus is sn essy-t o-lnterface , processor- 
Independent, non-multlplexed, 16-blt bus designed for 
mldrange Industrial sppllcstlons. The C-64 bus Is the only 
second generation 16-blt bus exclusively specified for the 
single height Eurocard formst of 100 by 160 millimeters (6 
inches by 6.26 Inches). 

The very high memory density of Che CESRAM-16 Is schleved 
through the use of smaller memory submoduies of 512 
Kilobytes each, built with surfsce mounting technology. 
These modules sre built by CESPAC snd available separately 
under Che product reference CESCMH-1 . Unlike the vertical 
mount submoduies commonly available in the Industry, 
CESPAC's modules sre mounted flat on the PC board, thus 
reducing the overall Chlckness of Che board and making lc 
extremely reaiscsnt Co shock and vibrations. The CESRAM- 
16 hss slso been csrefully laid out to lsure msxlmum heat 
dissipation. Its rugged design snd compsct size mske It 
Ideally suited for s wide range of industrlsl 
spplicstions. 

The CESRAM-16 Is svallable now ac $1450 when partially 
equipped with 1 MegsbyCes, snd $2350 when fully equipped 
wlch 2 Megabytes. The CESCMM-1 512K memory submoduies sre 
available at $495. 



For store information contact: 



Andre Felix 
GESPAC Inc. 
100 W. Hoover Ave. 
Mess AZ 85202 
(602.) 962-5559 
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Microprocessor Developments Limited 

3 Canfield Place 

London NW6 3BT 

Tel. 01-3282277 
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TRANSFERRING SCULPTOR DATA FILES BETWEEN DIFFERENT 
SYSTEMS 

The following Information is given In good fsith. However, 
the complexity of situations that can exist Is auch thaC 
Microprocessor Developmenca Limited cannot accept 
responsibility for sny problems that may arise as a result 
of following these guidelines. 

With only two exceptions. It should be possible to 
transfer sculptor dsts files between different types of 
computer snd also between different operating systems. 
The exceptions sre: 

1. Floating point data ( r8 and m8 fields) will not 
trsnsfer correctly unless the floating point format 
happens to be the ssme on both machines. Users wishing 
to determine whether or not this Is the esse sre sdvlsed 
to experiment . 



2. For historical reasons, 14 and m4 type fields in data 
files on the 6809 Unlflex operating system are not 
compatible with those on sny other machine or operstlng 
system, including 68000 Unlflex. 
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Note chat data files oust he transferred as binary files 
and not aa text files. It is Important to ensure that any 
file transfer softwsre that you uae will transfer all 
eight bits of each byte and will not modify, add or delete 
any characters. 

Once a data file has been transferred, ita index should 
be rebuilt. The index (.k) files are generally not 
t ransferrable between systems. This applies even when 
moving fron Unix version 7 or System 3 up to Unix System 
V on the same machine. An Index nay be rebuilt using the 
program kfrl. To ensure that you get the key length and 
the record length correct, run the program kfdet on the 
source machine. 

If a file cannot be transferred directly for some reason, 
use the alternative approach outlined on the page 2. 

If a file cannot be transferred aa outlined on page 1, the 
following technique may be used: 

1. Write a sagerep program to print tha content of each 
record in a format suitable for re-Input to a sage 
program. There are various ways in which thla can be done 
but a simple example is shown below. The method is easily 
extended if the file contains different record types. 



2. Transfer this file to the target machine as a test 
file. In this case the file transfer software should alter 
the end of line character(s) if necessary. 

3. On the target tnechlne, write a sage program to input 
the data, tlae newkf to create a new file and then run 
the sage program, redirecting its input from the 
transferred text file. 



Data Pile 



There is no overhead in a aculptor data file. The file 
aize in blocks may be calculated hy multpling the record 
length by the number of records and then dividing by the 
block size, which is 512 for moat ayatema and 1024 for 
Unix System V. The apace occupied by deleted recorda is 
reused for new insertions. 

Index Pile 

The size to which an index file will grow depends on the 
pattern of insertion and cannot be calculated exactly. 
Leaa apace is used if records are lnaerted in a randoa 
sequence. The worat caae occura when recorda are 
inverted in ascending key sequence. An estimate of the 
file size may be made aa follow. 

b • block aize (512 moat systems, 1024 Unix 
system V 

k - key length in bytes 

r - number of records to be inserted 

m « maximum number of keys per index block 

m - (b - 12) / <k + 5) 

Kor random insertion pattern: 

Index file size in blocks - (3 * r) / (2 * m) 



For ascending key sequence insertion: 
Index file size in blocks • (2 



* r) h 



NUMBER OP INDEX LEVELS 



Example sagerep program (pstock.r): 

!flle stock 

! final print "e" 

print *i" 

print st code 

print st_deac 

print at costpr 

print at salepr 

Correapondlng aage program (ratock.f) 

REBUILD STOCK FILE 
!flle stock 
+st_code,,3,20 
+st_deac,,*,20 
+st_costpr,,5,20 
+st salepr, ,6,20 



»l«lnsert 



input at code - st_salepr 

Insert stock 

end 

*e-exlt 

exit 

Typical commands to run above programs: 

On the source machine: sagerep ptck pvdu >stock.txt 

On the target machine: sage rstock <stock.txt 



Although the performance of a keyed file is elated to the 
number ol index levels, there Is little point In 
attempting to estimate the number of levels that will be 
built. Each new level exponentially increases the number 
of records that can be indexed and causea no space 
overhead. The performance on large files is very 
impressive. 

SCULPTOR VERSION 1.12:4 

ENHANCEMENTS TO SAGEREP 

1) lefile [<flle_no>] <pathname> 

Declares a croaa reference file which is to be initially 
cloaed. icfile declarations should precede Ixflle 
declarations. The total number of .'file, !cflle and txfile 
declarations cannot exceed 16. 

2) close <fllejio> 

Cloaes and unlocks the specified file. The data In the 



The command la 



file's record buffer is still available, 
ignored if the file la already closed. 

3) open <flle no) 



Opens the apecified file. If the maximum number of fllea 
that can be open at one time la exceeded, an error 
meaaage Is generated and sagerep aborts. The command la 
ignored If the file is already open. 



4) abort [<code>J 



Unix is a trademark of AT & T Bell laboratories. 
Uniflex is a trademark of Technical Systems Consultants. 
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Causes ssgerep to terminate immediately without 
processing any 'final statements. Otherwise similar to 
exit. 

5) display and input are now available as in-line 
commands. Syntax is the same aa Idlsplay and Unput. 
April '86 51 



6) A sagerep program with no main statements Is now 
permitted. The program will terminate normally If It 
reaches the main statement logic. 

NOTES 

1) Any attempt to access a closed file causes an error 
raessage and the program to abort. 



kfcopy [-el [-cl <oldfile> <newfile> 
If the [ -e ] option is specified, <newflle> must 
exist and may have heen pre-extended using 
newkf. it must have the same key and record 
length as <oldflle>. Any existing records In 
<newfile> are retained. 

reformat [-ej <oldflle> <newflle> 



2) When a file Is closed any locks on that file are 
removed. If the file Is later re-opened, there Is no 
selected record and therefore no write Is permitted until 
a record has been read. 



If the -e option Is specified, <newflle> must 
exist and may have been pre-extended using 
newdf. Any existing records in <newflle> are 
retained , 



i) Closing and reopening a file leaves the current file 
position unaltered. 

4} On MS DOS, all files accessed by a child task should 
be closed before doing a chain or exec. 



kfri 



:) <filename> 



On OS9 only, kfrl now automatically pre-extends 
the new Index file to a size computed from the 
length of the existing data file and key length. 



■HHANCEMENTS TO SACS 

1) Icflle [<file_ld>] <pathname> 

Declares a file which Is to be initially closed. Icflle 
declarations should precede !flle declarations. The 
total number of !cflle and Ifile declarations cannot 
exceed 16. 

2) close <flle_ld> 

Closes and unlocks the specified file. Th data in the 
file's record buffer Is still available. The command is 
Ignored if the file is already closed. 

3) open <file_ld> 

Opens the specified file. If the maximum number of 
files that can be open at one tine is exceeded, an 
error message Is generated and sage aborts. The 
command is ignored If the file Is already open. 

4) preserve <file ld> 

Stops the clear command (with no fleldlist) from 
erasing data in the specified file's record buffer. 
Effective for the rest of the program. Hay be used on 
a file which is open or closed. 

SCULPTOR VERSION 1.10:3 

The following enhancements, which were Introduced in 
Sculptor version 1,10:3, are particulary useful on the 0S9 
operating system, but their side effects of enabling files 
with the same record structure to be easily merged is 
generally useful. 

On 0S9 systems, the repeated extension of files can 
eventually result in the sector map for a file becoming 
full. When this happens, the file Is often logically 
damaged and is reported as such by kfcheck. The problem 
can be reduced by formatting the disk with a large 
cluster size, but this does not guarantee success and 
wastes space on small files. 

A better solution is to pre-extend a file when It Is 
created to its expected maximum size. The program newkf 
now has this option, and several other programs have been 
modified to take advantage of it. The enhancements are: 

newkf [-rnj <fllename> (<filename>]. . . 

Creates pre-extended files with space for 'n' 
records. Although newkf takes extra time to do 
this, there is no significant loss of performance 
when accessing the physically larger file through 
Its Index. 
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Winchester 10 Megabyte Drives 
Two (2) 10 Megabyte Hard-Disk Winchester 

Drives. Working - were removed for 
upgrade to larger drives. 

1 - RMS Model 0509 S275.00 

1 - Seagate Model *M2 S275.00 

(615) 842-4600 Tom 9-5 EST. 

LSI 68008 CPU card, "C" Compiler and 
Digital Research CPM/68K S350. 

Tano Outpost II, 56K, 2 5"DSDD Drives, 
KlEX, MUMPS S595. 

M1CR0KEY Single Board Computer, Target 
128K RAM, FLEX, FORTH, with optional 6502 
CPU f, ROMS as advertised on p. 51 DEC. 
84 68' Micro Journal. $1800. 

l-PT-69 complete with Dual 5" DSDD Disk 
System and Controller, includes FLEX DOS. 
$745. 

TELETYPE Model 43 PRINTER - with serial 
(RS232) interface and full ASCII keyboard. 
$359.00 ready to run. 

S/09 with Motorola 128K RAM, 1-MPS2, 
1-Parallel Port, MP-09 CPU Card $1290. 

1-CDSl 20 Meg Hard Disk System with 
Controller $1000. 

(615) 842-4600 N-F 9 AM to 5 PM EST 
*** 

GIMIX Mainframe, Voice, Music, EPR0M, RAM, 
CPU, Serial, Parallel, Disk Boards, SSSD 
DRIVES, S0R0C, PL9, DYNA C, PASCAL, 
FORTH, MRP, Display Generator. 
(412) 563-5312 

Programmer wanted for a rapidly growing 
engineering firm. Company develops and 
builds hardware and software using 
Motorola fl and 16 bit processors. Good 
background in "C" and assembler required. 
Starting salary in the lower 20's. 
Send resume to: 
P.O. Box 8695, Greenville, S.C. 29604 

Several 2MIIZ 64K Static Ram cards, $75 
each. Misc. SS50 and SS30 cards. Call 
with your needs. 
(703) 273-6629 evenings. 
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Clear-brook Software Group 



CSG 




Informal. on 

Management 
System 
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Announcing a new 
Information Management System 

CSG IMS i powerful, versatile and easy to 

ute tool for the crest ion and maintenance 

of data bases and user applications. 



y^^^^^^^^^^^^Wi 
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Some notable features Include- 

- Menu-driven front end. 

- Comprehensive applications language. 

- User definable screen forms. 

- Interactive ad-hoc query environment. 

- User definable report forms and 
report generator. 

- Data base program generator. 

- B-tree data base indexing. 

- Hybrid network-relational data base 
model. 

- Virtually no limitations on the sizes of 
records and data bases. 



vUUsMjmwmwmmi 



CS6 IMS for 0S9/6809 LH Is $495. 
Introductory price until June 30. 1986 Is $395 

A run-time package for user-developed 
and distributed applications Is $100. 

North American orders add $5 for shipping. 
Foreign orders add $10 for shipping. 

CSG IMS will be available for 0S9/68000 and 
0S9/6609 LI in the second quarter of 1986. 



For information or orders, write: 



Clearbrook Software Group 

446 Harrison Street 

PO Box 6000-499 

Somas. WA USA 96295-6000 

Telephone: (604)653-91 IS 
Dealer inquiries welcome. 



0S9 ia a registered trademark of 
Microware and Motorola 
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OS-9 UniFLEX >< 

MUSTANG-020, 68020, 68881 AND MORE 
HANDS-ON EXPERIENCE 



The DATA-Comp Division of Computer Publishing Corporation announces their new and 
innovative HANDS-ON 68020 computer familiarization two day event. A chance to TRY 
BEFORE YOU BUY! 

For two full days (Monday through Friday - excluding legal holidays) each participant will 
be furnished the exclusive use of a 68020 computer (MUSTANG-020). Each system will 
have available native C compilers, BASIC, assembler and other high level languages. Each 
system will be equipped with the Motorola MC 68881 math co-processor, where 
applicable. 

Each demonstration room will contain not more than two work stations. Each system will 
be equipped with floppy disk, 20 megabyte Winchester technology hard disk, and 2 
megabyte of RAM. RAM is partitioned as 690 K bytes of RAM disk and 1 .2 megabyte of 
user RAM space. 

Participants are encouraged to bring along any source level projects, for evaluation, in C, 
BASIC or assembler. Call for availibility of other HHLs. 

Although this is not a training seminar, Data-Comp personnel are available for assistance 
and consultation. This event is scheduled for hands-on evaluations of the 68020 CPU, 
68881 math co-processor and MUSTANG-020 system, operating in a functional 
environment. 

Transportation to and from the airport and hotel/motel will be provided. Lunch provided 
both days. Chattanooga airport is serviced by American, Delta, Republic and other airlines. 




COST 

One person - S375.00 
Two persons - $595,00 



* Motel single $22.00. double $26.00 
Includes satellite TV - convenient lo food and shopping 




DATA-COMP 

5900 Cauandia Smith Rd. 
tfcoon. TN 37343 



(615)842-4600 



Tilti S 106006630 



Systems available for both OS-9 and UniFLEX. Reservation should be made IS days in 
advance. Attendee should initially indicate OS-9. UniFLEX or both. Special facilities 
available on request. Please write or call for additional in formation. 

NOTE: Both OS-9 and UniFLEX are Unix type operating systems. Each as been enhanced 
in some aspect or another. Prospective attendees should have some working knowledge or 
experience with one of these operating systems, to gain full benefit of the session. 
However, a newcomer will find that it is a simple matter to be fairly proficient in using these 
systems in the allocated time. Special system instruction available on request. Call or 
write. 

* Hotel/Motel cost air separate cost, not included in the basic cost shown. 
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for the CoCo 
DISK SYSTEM 




XPNDR2 J3» 95 e*ch or 2/$78 
This prototype card tealures a 40 pin 
connector for protects requiring an on- 
line disk system or ROM paks Trie 
CoCe signals are brought out to wire- 
wrep pins Special gold plaled spring 
clips provide reliable and noisefree 
disk operation plus solid support lor 
vertical mounting otlhe controller The 
entire 4 3 > 7 Inert card is drilled Mr ICs 
Assembled, lasted and ready to run 

XPNDR1 Slv.SS each or 2/S36 
Arugged 4 3 >8 2 Inch bare breadboard 
thai brings the CoCo signali out to 
labeled pads Sold XPNOR cards are 
double-sided glaas/epoiy. nave goid 
plaled edge connectors, thru-hole 
plating and are designed with heavy 
power and ground buses They're 
drilled lor standard 03 and 06 men 
wlda dual In-line wirewrap sockets 
wilhaQ 1 1nchgndontheoulboardend 
lor connectors 

SupetOukte I3.SS each 
Hera is a unique plastic insert that 
aligns and supports printed circuit 
cards mtheCoCocartridgepori Don't 
forget to ORDER ONE FOR YOUR 
XPNDN CARDS 



included with each XPNDR card 
are 6 pages ot APPLICATION 
NOTES lo help you learn abo I 
chips and how lo connect Ihem lo 
your CoCo 



To order or lor technical informa- 
tion call 

(20») 762-H09 
weekdays 8 a rn lo noon 
We pay shipping on prepaid orders 
for immediate shipment send 
check, money order or the number 
and expiration date ol your VISA or 
MASTERCARD to 

ftOtOTKJ^mCltOS TSTI MS 

BOX 30807 SEATTLE. WA 98103 



SOFTWARE DEVELOPERS! 

YOUVE JUST BEEN GIVEN THE BEST REASON VET 
TO GET OUR BBO0O. UNIX* OEVEUTTMEN X SY5IEM 

THE VAR BKK' SERIES 




lll.lt> 

lnr*«fcr» TenrnraL 20 Mb ha/d disk. 
SIJK HAM upon, «n0 KZEUU6* 



III. est 

InHudc* all <* **»*. PW 20 Mb 
iMpr %ttwamtt 



RESMJJOtSI 



IBin PC/0S9 Cnmpatibilitg 

Smoke Signal can add IBM PC capability to your 0S9 
system for as little as Sit 95 plus software. 



YMI.4MI M • 



itfWrirKMl 



TO OsVTAlH VDtm VAJt «*» 

At tmemm urm nmrw*, cwrarr 

WTBTV** VUUttC CA»L3»2 



wm 





Both boards designed to the 5i inch disk drive footprint 



ESB-I 



$495 






68008 microprocessor - BMhz 

128K DRAM 

Up lo 64K ROM 

Two asynchronous serial pons 

Two 8 bit parallel ports 

Floppy disk controller / up to four 5j" drives 



COMING SOON: ESB-IR 



ESB-II $595* 

68000/68010 8, 10, or 12 Mhz 

Up lo 1Mb DRAM 

Up lo I28K ROM 

Two asynchronous serial ports 

24 bit parallel port 

One 24 bit timer / one 16 bit timer 

Floppy disk controller / up to four Si* drives 

OS9/66K Operating System Available 

68000 - 8 Mhz W/I28K DRAM version 
Consult factory for expanded configurations. 




68008 - 10 Mhz * 5I2K DRAM * 3i" diskette footprint * runs OS9/68K 



EMERALD COMPUTERS 



INC. 



(503) 620-6094 - Telex: 311593 

- 16515 S.W. 72nd Avenue - Portland, Oregon 97224 
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ATTENTION all STAR-DOS U««rs! 

we have made some very significant changes. 
Improvements, and additions to STAR-DOS". 

STAR-DOS now ... handles random (lies with 
unsurpassed speed . . . even allows random fllea to 
be extended ... loads programs faster than ever 
... has extensive error checking to avoid operator 
and system errors ... comes with source code to 
allow you to modify STAR-DOS for your system to 
add automatic date Inaertlon. time stamping of 
flies (even random files), and RAM disks up to a 
megabyte ... allows up to ten drives ... Includes 
a wide selection of utilities which often cost extra 
on other systems ... comes with superb 
documentation and user support. 

we greatly suggest that you update your present 
copy of STAR-DOS. Just send us your original 
STAR-DOS disk elong with 13 to cover postage, 
handling, and a 15-page update manual. 

And if you aren't using STAR-DOS yet 

why not awlteh from FLEX Urn of Technical 
Systems consultants) to STAR-DOS (our 
trademark) now? Consider alao our SPELL 'N FIX 
and MAGIC SPELL spelling correction programs. 
WRITE 'N SPELL dictionary lookup program, 
HUMBUG monitor and debug system. CHECK 'N 
TAX home accounting system. SBC-02-B 
single-board control computer, and more, write 
for a catalog, or call us at <9H) 241-0287. 



*Rsr, 



AR-KTTS" 



Box 209 Mt. Kisco NY 10549 



AADEJJSON COWlfTFJl CONSULTANTS 

a 

Associates 



Ron Anderson, respected author and columnist 
for 68 MICRO JOURNAL announces the Anderson 
Computer Consultants & Associates, a con- 
sulting firm dealing primarily In 68XXCX) 
software design. Our wide experience In 
designing 6809 based control systems for 
machine tools Is now available on a 
consultation basis. 

Our experience Includes programming 
machine control functions, signal analysis, 
multi-axis servo control (CNC) and general 
software design and development. We have 
extensive experience In Instrumentation and 
analysis of specialized software. We support 
all popular languages pertaining to the 6809 
and other 68XX<X) processors. 

If you are a manufacturer of a control or 
measuring package that you believe could 
benefit from efficient software, write or call 
Ron Anderson. The fact that any calculation 
you can do with pencil and paper, can be done 
much better with a microcomputer. We will be 
happy to review your problem and offer a 
modern, state-of-the-art microcomputer 
solution . We can do the entire Job or work 
with your software or hardware engineers. 

Anderson Computer Consultants & Associates 

3540 Sturbrldgo Court 

Ann Arbor. HI 481G75 



Heavy Duty 
Switching Power Supply 

For a limited time we will offer our HEAVY DUTY switching power supply, for those 
of you wanting to do your own thing with hard disk systems, etc. The specifications 
are shown below. Note that this is a price far below normal prices for supplies of 
this quality. 

Hake: Boschert — Size: 10.5x5x2.5 inches-including heavy mounting bracket/heatsink 

Rating: In: 110/220 ac (strap change) Out: "130 watts 

Outputs: +5 volts - 10.0 amps 
+12 volts - 4.0 amps 
+12 volts - 2.0 amps 
-12 volts - 0.5 amps 



Mating Connector: Terminal strip 

PRICE: 




load reaction: Automatic short circuit recovery 



DATA-COMP 

5900 Cassandra Smith Rd. 
Mtoon . TN 37343 



(615)842-4600 

T.I* , 510900*930 



$59.95 + S7.50 S/H 
2 or more $49.95 ea. +$7.50 S/H each 



Also: Dyssn made Diskettes - 8" SSDD Box of 10 
We pay Shipping in U.S.A. & Canada. 



$18.00 
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SOFTWARE FOR 68Qx AND MSOOS 



SUPER SLEUTH DISASSEMBLERS 
EACH J99FLEX S101-OS/9 J100UNIFLEX 
OBJECT-ONLY varslorii: EACH SSO-FLEX,OS/s,COCO 
mma**t oarwara HDil on dW> wei ttoata. kuk ml. bnary adana. 
•pacify 6*00. 1.2.3.5. 8.8*502 varvon or 780/8090.5 va/son 
0S» »anagi also pmraMii REX buK objact ■» undar OSa 
COCO DOS avkUataa In eaoo.l.2.3.9.8.ft«S02 vaniai (not 220/8060.5) onry 

CROSS-ASSEMBLERS (REAL ASSEMBLERS. NOT MACRO SETS) 
EACH S50FLEX,OS/9,UNIFLEX,MSDOS ANY 3 $100 ALL $200 

ipaciiy for ie0x.e5O2.6ea».6Bw.8805.B8O9.ze,zeo.ao48.805 i.ao85.«eooo 
modular. tieKBntfng cfa&g-aas«mb)*n) In C. wWt toadAjrload uiWaa am) mama 
8-lnt (not 68000) souicas lor additional ISO aacfi. S100 for 3, {300 for all 

DEBUGGING SIMULATORS FOR POPU LAR 8>Bir MICROPROCE SSORS 
EACH $75-FLEX $100 OS/9 $80UNIFLEX 
OBJECT-ON LV varalona: EACH UP-COCO FLEX.COCO OS'S 
n» a ».«) iMUN prooa aa a rt . induf ifc m» i «) tomxsing. bnary adaing 
■pactfy fo> «800^. (14)9805. esoe. 6809 OSri, 2B0 FLEX 

ASSEMBLER CODE TRANSLATORS FOR 6502, 6600/1, 6809 

6502 10 6809 S7S-FLEX SBS-OStt S80-UNIFLEX 

6800/1 to 6809 ft 6808 to po«(Boo-|nd ISO-FLEX S7S-OM 160-UNIFLEX 

FULL-SCREEN XBASIC PROGRAMS wMn tuner actor 
AVAILABLE FOR FLEX. UNIFLEX. AND MSOOS 

DISPLAY QENERATOFLtOCLMENTOR ISO waourca. 139 without 

MAILING LIST SYSTEM 1100 Maouroa, ISO without 

•MVENTORY WITH MRP 1100 w tourca. t» without 

TABULA RASA SPREADSHEET 1100 »faOun», ISO llftat 

DISK AND XBASIC UTILfTV PROGRAM UBRARY 

$50 FLEX $30-UNIFLEX/MSDOS 
edt oJtk worn, ion ovuctary. makttkt maslst cautoo. ooOsksam. 
rwxquonos aomaoraU or BASIC piDO'WxralBASIC program, etc 
norvFLEX vanaons Irduoa son and r 



CMOOU iHfTtMaflCa T)OrC PROG RAM 
$100 FLEX OS/9 UNIFLEX.MS-DOS 
OBJECT-ONLY mivr*: EACH ISO 

itw«fc«l »th Wmwia ) moo> . Ha tfanatar. MXHV7, XON-XOFF. OK. 
tor COCO and rwvCOCX* «**« caamal COCO mm port up to 3*00 Baud 



DISKETTES & SERVICES 

5.25" DISKETTES 
EACH 10-PACK $12.50-SSSD/SSDD/DSDD 

American- made, guararsearj 100% quality . <Mfn Tyvak tadwts, hub r 



AOOmONA L SERVICES FOR THE COMPU11NG COMMUNITY 
CUSTOMIZED PROGRAMMING 

n anitTirm ar[ ill rni niia n raiirriin !■ arr nui aii or inou 
brafu* tor ipaaakiatl aaBFnar uaa o> to oovat naw (rmmaon. thaoturo* 
tor auo*i aaSomuSEVi deponda upon Via niartanbitty of tie rraAakvsj . 

CONTRACT PROGRAMMING 
wa wl craate naw programs or modrry amaung programi on a contract basA. 
a wvn M rwira prontfcd to owr (warty yaara. »» computers on whcriwa 
haira partormao" contract proo/amrrwig n c iuda moal popidar mo da n of 
n u »»amaa, mduaVg IBM. aurouo)*, Urwac H u ii i — 1. moat popiar 
modaajOfnMsTnjaaw*. noU»~u C€C. BM. DO. r*>. AT&T, and moat 
popular txanda of mtooEomnjiao. tndurang 6800/1.6809, Z80. 6502. 
fflODO. uajng mod ■.inn — aavagat and opanang syaarm. on ai — '■ 
ranging n to* kom large lamui i miJ a w a to argla board iilait 
^ Onarga tor oarinci p io ya fnma n n iai n »| by tta hour or By va tatK 

CONSULTING 
wa offer a wkja range of Du&nais and lacnrteal oonauVs asvfeaa, nduing 

Mrr#iari . arMo*, trafino, and dragon, on any topic related to ogmptAtfi; 
tho *aro» tar ostmArng la rom»V Daasd upon tima. ravel, and mtpm^m . 



Computer Syalemt Conaullanta, Inc. 

1454 Latta Lane, Conyars, GA 30207 

Telephone 404-463-4 570 or 1717 

We lake order* el eny time, but plan 
long dlacuaslona eller 6, II possible. 

Conlect ua about calelog, dealer, diacounla, and aarvlcee. 
Most programs In aource: give computer, OS, disk alia. 
25% oil multiple purchaaaa ol same program on one order 
VISA end MASTER CARD eccepted; US tunda only, please. 
Add GA tales tax {It In GA) and 5% shipping. 
|UN*FV£X an Taovoa Spana Qraaarat, OS/9 taooMa.GOGQ Tandy iHSDOS 



SOFTWARE,. 
HARDCORE 



•■ FORTH PROGRAMMING TOOLS from (he 68XX4X " 
" FORTH specialists— gel Ihe best" " 

NOW AVAILABLE —A vanelyol rom and disk FORTH systems to 
tun on and'or do TARGET COMPILATION lor 

6800. 6301 6801. 6809. 68000. 8080. 280 

Wnle or call tor information on a special system lo til your require- 
ment 

Standard systems available for these hardware— 

EPSON HX-20 rom system and target compiler 

6809 rom systems for SS-50. EXORCISER. STD, ETC 

COLOR COMPUTER 

6800 6809 FLEX or EXORCISER disk systems 

68000 rom based systems 

68000 CPM-68K disk systems, MODEL 1112/16 

(FORTH is a refined version of FORTH Interest Group standard 
FORTH, faster than FIG-FORTH FORTH is both a compiler and 
an inteipreter It executes orders ol magnitudes laster than inter- 
pretive BASIC MORE IMPORTANT. CODE DEVELOPMENT 
AND TESTING is much, much faster than complied languages 
such asPASCAL and C. If Software DEVELOPMENT COSTSare 
an imponant cooeern for you. you need FORTH! 

firmFORTH"* is for the programmer who needs 10 squeeze ihe 
most into roms II is a professional programmer's tool for compecl 
rommable code lor controller applications 

a t*OffTM and tmtFORTH ■• trada"whi of Tarwr MxrotyiaBra, 
* FLEX • « trarUm** of Taonca SnMmt ConauaanQ »<c 
~ CM-4BK »oa«wn*(» of D»g*ai IWuarcn kic 



tFORTH® 

from TALBOT MICROSYSTEMS 
NEW SYSTEMS FOR 
6301/6801, 6809, and 68000 

--> IFORTH SYSTEMS <— 

For all FLEX systems: GIMIX, SWTP, SSB. or EXORcisor Specify 
5 or 8 inch diskette, hardware type, and 6800 or 6809. 

" IFORTH — extended fig FORTH (1 disk) $100(515) 

with fig line editor. 

" IFORTH ♦ — more' (3 5" or 2 8" disks) S250 (S25) 

adds screen editor, assembler, extended data types, utilities. 
games, and debugging aids 

" TRS-80 COLORFORTH — available from The Micro Works 

" firm FORTH — 6809 only $350 ($10) 

For larget compilations to rommable code. 
Automelically deletes unused code Includes HOST systam 
source and arget nucleus source No royalty on targets. Re- 
quires but does not include IFORTH + . 

" FORTH PROGRAMMING AIDS — elaborate decompilers 1S0 

" (FORTH for HX-20, in 16K roms for expansion unit or replace 
BASIC $170 

" 1FORTH'68K for CP M-68K 8- disk system $290 

Makes Model 16 a super software development system 

" Nautilus Systems Cross Compiler 

— Requires: IFORTH + HOST + at least one TARGET. 

— HOST system code (6809 or 68000) $200 

— TARGET source code: 6800-$200, 6301/6801— $200 
same plus HX-20 extension s - $300 

6809— $300 . 8080 Z80- $200 . 68000— $350 

Manuals available separately — poae in ( ) 
Add $6 system tor shipping $t5 for foreign air 



TALBOT MICROSYSTEMS 1927 Curtis Ave., Redondo Beach, CA 90278 (213) 376 9941 
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WINDRUSH MICRO SYSTEMS 



UPROM II 

PROGRAMS l<*d VERIFIES: 12758, 
T25Q6, I27tfc, T2516, 1273?/2732a, 
»C*66>6t/6, 12?c*./27*<.A, T2S6«, 

i2n26/c7WBa, *od 127256. 

{•Intal, T-T**lS, M'/Iotoro 1 .* . 

AH? ftB$QhJH,ITT rttflgLiS- ■ ECJUtRlD! 

TRl-VOLf LPR6MS A Rt Ml SUPPORTED 

INTEL'S 1nteiigi.ni programing 
<t<> lap lamented fc Intel 

270*, 27126 and £72^6 device*. 

Intel Hgi nl prafrjaielng rtduttl 

th* average programing Ctlfl of a 
276*. fro* 7 alnutes to 1 »10ull 
IS seconbs turvjer FLEi> *ith 

•jraatly iaprovro: nlliblluy. 

tMf/ I Full)' fndoild DOd «1fh >' 

flit ribbon cable lor connection 

to ihr host <MWtrr NC6821 *l» 

I WNOi?Ji- : intfrlaca board. 

ir 

HC6809 to't.ir* for FLEl and OS? 
(Level 1 or Z, Version 1.2). 

aiNAAV US* Flit Oifsel loader 
supplied -ilh FLEX, MOOS And 059. 

Rervu drles-ft loftirtr* proved** tfrp TdllOaing 'nHitUt: 

a. 'Ilk * selected ■<-•■ of the buTF«r a tin * HEX <h«r. 

b. ROVE blocks ot 0*u. 

c. PlftP in* butler in HCl and MCI I. 

d. FIND | string of bjriei in the oufter. 

*. ElAMlAEJiMANGE . EFiB Cfintwll *f 1 h* DuM«r. 

1. CMC checisu* I seleccad irn at iri* buffer. 

g. COPt a «tntrt area o< en ep«Q* into th* bull*'-. 

h, MERJM a selected area at an (PflW age1mt tr>t buffer. 

1. »RCGHA* a selected area of in fcp«0« n*T h Seta in in* huMtr, 

1. SIlECI a ao LPf):0A lyoe (Mlur« to If on iMftul . 

k. ENIE* irir i r j!»» nWiilor. 

I StTUAN .. 10 th* CPer»tinS lUtU. 

I. arU'f any DOS blllfty lonly in FlE* and 0S9 versions). 

mi ANC 0S9 VERSIONS AVAlLADXE FBOH GIHU. iSB/Wt>» CWMtl VS MRECI. 



PL/9 



■ Friendly inter-active [nmronarnt uher* you ha** INSTANT access to Tht 
Ed 1 lor, in* CoacUer, and t*e Trice-* (bugger, *nich, a eon 9* t other 
(Mngi, tan Iing.1* st*p ih» program a SOO°C1 line al a eta*. T u also 
hauc direct aecett It) any ilu utility and your Witt* aoMtor. 

a J'S- page vanual organised at a tutorial with plant/ ol *ie*plt*. 

a fast SlmiLE PASS compile*- produces ««. of COMPACT are FAST 6St)9 ucMot 
caili? output Oer »irtuta with no run-i tae overhead! or license fee*. 

a FmILi* c«*w*tibl« «ith TSC ttal editor Toraat 4m fM«i. 

• S"gn*d and unt^gr>ad BirUt ang [NTE&EUt, 52-Ht t leafing point a£AL1 . 

• reclort (mmgl* dimffilDn arrayi) and potnEari art luppuftrd. 

• Hathfact 1cal 9tart\\\an\i <*i, t-l, (*), </), aaOilul IU« nrgatlafl 1-1 

• dprnimn evaluatori: Ca)« to), (<)/ <>>, <>•>, <<■) 

• alt eperaiori; !««»>, <0R). tE0«;iO»), (HQTti l!*t»n, (S«*P> 

• Logical ooaralori: <.aNol f f.om, <.E0«/IW) 

« Control. lt*t«*intt: If . ,tHtH..ELS€ , If ,.t ASH. .(«S(2 ..USE* e€filN..CH0, 

WHILE.., (lEPE»r..UMltL, REPfAT.. FOREVER, CALl, JUMP, VETURM, 8fl£Al, GOTO. 

• Direct access to (*CCA>, <ACCB>, <iCC»), <HAC«>, <CCR) atd [STACK). 

< FUil.t t^DParia The rK680f) RESET, h«I, rllQ, I«fl, Sul/ SHI2, end Sw| ) 
•ectorc. Writing a %«l f-itarl ing <lrom ODutr-up) orogfaa that uifl ihT, 
or ALL, ot the NC&sOV tng«rr u pt« (» an absolute snap! 

• nac&'ine code **? be eabadded In im prograa a1« the *<iEK' iTaCanant. This 
ene*Laa yc^ to cod* crutcat »auilr*tt In asseablr language and aeCed thes 
in tn« pl/9 brogran (eee *nact* (or details). 

• Procedures nay b* passed and **r return variabies. this nates t haa> 
functions ahieh bahav* as lAcxigh tn«/ uer* *r> integral can of Pl/9. 

• Several roily documented library procedure Mdulas are »upeL1ril: iOSues, 
BIT10. HA«>]0, HE'tO, FLEHO, SCIPACR, SFoSUflS, BAS1RIRC, and REILCCH. 

'... IwlS. IS FWE HQSF EFFIC1EHT COMPILER I HAVE rOUHP TO PATE.' 



MACE/XMACE/ASM05 

All or chose products feature a highly producllw* env) ronaani nkm Ida 
editor and the eaaewtalcr rastdr In •eaarj' fogatltr. 4ona «r a \ht days " ' 
tedium diik load aivJ lave ooaraiions «hHe yov ar* deOugg ing your tode. 

* Fr>en.dD' Inter-active ainvircVaenl rtere you ha« Instant access to. IK» 
Editor ar<d the assembler, 'tCx uliWtfai and your tyi.tr* oonitor . 

* "-ACE can also produce ASPtPHOCs ICiiN stalr»ents) tor PL/9 nilh the 
essenblr languiafll source omis la th* output at coaaents. 

* XrUCE Tt a CTOSI UttiStfr for the 6690/1/2/3/9 and lupporli ib» citfndrd 
*pnaicxi->cs of th* 6303. 

* AJPeO'J il a crrjis a»e*bler For th* 6B05. 



Quoted fro* ton Anderion* FLEI Uter Mate* <qtuasn 1n "64. Head u* Say «'!' 



D-BUG 



L.O0KINQ tor * single ftev tracer and «ini in-(.1n* disas*enbl«r that is easy 
to U»r?7 Look no furl her, yog have found it. This pacHQr It ideal lor 
chose ipjiU aasapbly language progran dabud/gmg sisiiooi. D-tHIb occupies 
less than pn {including Us stack and variables) a»d aay tie loaded *ny M neri 

In mwmory, ait yOw dO IS LOAD IT. Aln IT jrwd 60" <50 col VDUS only). 



McCOSH C 



Fril* H n <«plnr a •( * coatplirr as pou »Ut f Irvs on any operating sytteai 
tor the &4U9. It 1s to-OUtaly coe«alibtr 4ith U*tK till and only LaCAa 
•btr-riatdt' (Milch are of Utile practical 1.4* »n an d-4)M world). 

■ Produces v*cy efFl^ant •iirntoly ta^i^agr mu'tf ooCPut with the «C 
»ouTLt obtlnnalLy Inlertaaved as coitanrnts. 

• Bull 1-ir, ofiT l*i*rr alll ttiuf l«rs Ofcletl CiMr tiy attOut tit. 

• Supports 1nt*rla»v»rl PSHMlty language p'oq'Hn. 

• ISCtuDts Its *yn 4l-&e«bler. Ine tSC relocating *>>oa*ii.rr 19 only rehired 
if W J*"l to grirraitf your Uyn llbrariri, 

» Tap D" pmtfitof, eosfil'r, aprt«l/ r r v nl'iblrr and loader alt 'ur 
lndrpcodantVy or under the 'CC* rjcecutiva«. 'CC nakes conp^llng a program 
to eAacutable ot>)*ci as s1*Dle «S lyping 1n *CC,HELLt),C <RETuftN>* . 



IEEE -488 



SuPPMTS ALL PRINCIPAL MODES OT THE JUE-t#e (Jg7>(«) BJS SPECIF Kst IOH: 

- Talker - Serial «0U - Single or O.j-1 PrUir/ Addraam 
• Listener _ p 4ra tj«i Pole - focondary Addras* 

- Systea Cwfelltr * Group Tr iggar - Talk, only ... Listen only 

fully docunented vith a tonptft* reprint ot the tHwiAtjD irrtdc on the 
Jttt fjus iind th* Motorola publication 'Oiling aboard th* IEEC Bus 1 . 

' loh level auefibly languaOe oriveri suitable for 6600, 6801. 6802, 6803, 
6408 ano 6609 *r* Supplied in ih» lora *l listing*, a Eonol*te back to 
back last progr** It also lucplfao In thr lora of a llxing. Th«S4 
drW*rs hive oeen e> tensivety lesteg and are waRariTtEO lo mrk. 



Singlr S-50 bourd 14, B or 16 addr«is*s P*F oori), fully 
plat*d ous connectors and IEEE interface cable assembly. 



kclcd, gold 



PRICES 

O-0U& I6S09 FLEX only) I r^.tjfl 

"ACS (6809 FL[X only) 1 73,00 

1HACE 16809 FLFX only) 1 98.00 

ASM05 (6M9 t\.ix only) S 98.00 

PL79 t«cKI9 fLEI only) $198.00 

"C" 14809 rm only) t79t.00 

UEE-46B «-> th I((E-t88 cable asseably S298.00 

l)PR0«l»J I/lJ utlh one version of sottwarr Ino cfple or inttrlaca) .. SJ95.D0 

UPROM-l I/£ ai above but complat* u'th cable and S-5C interlace ...,t>43.00 

CAtHC 5* t'uiat»/>-ffat SO -ay cable -Uh IOC c«in*clor 1 K^.OO 

5-30 INT 55-30 Interface *o* uPBOtt-lJ 1110.00 

EXOR INT rVotorola tXORbUS CECORt iiar) interface For UP ROM- 1 1 ... Sm.OQ 

ItPBQri SFT Soltaar* drivers For 2nd OPeratlnD systes. 

Sfeacify FLEK or 05 fl < M» disl jiia! » 3^.00 

L'ffioa s»c asseebly language source (contact us diraetl 

A~L~i PBICES INCLUPE All MAIL POSIAQI 

Tarjpi; CkjCU Paymer.1 by Infl ttariry Order. VISA pr rJASTEI*EARD alio accepted. 

WE STOCK THE FOLLOWING COMPANIES PflOOUCTS 
G-fcltX, S3B, FHL, MeCROWARE TSC. LUCIDATA. LLOYD I/O. 
A ALFOUD 1 ASSaOCIATES. 

FLEX Clw) is a Lrid*a#rk oi Technical Syitaas C-ontu 1 1 am s t 03-9 Ufa) \\ a 
trademark crt NifrQwart SrlttBt Corporal ion, N603 [!■) and EKQtdier [Tfa) 
are tradeparsii of fkotorpLa In cprpctrat ad . 



WORSTEAO LABORATORIES, NORTH WALSHAM, 
NORFOLK, ENGLAND. NR28 9SA. 

TEL: 44 (692) 404086 
TLX: 975548 WMICRO G 
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OK, PLEASE ENTER MY SUBSCRIPTION 
Bill My: Master Charge □ — VISA p 

Card it Exp. Date 

For □ 1-Year □ 2 Years Q 3 Years 



Enclosed: $ 



Name 



Street. 
City 



State 



Zip 



My Computer ls:_ 



Stfescrlptlon Rates 
(Effective March J, 1985) 

U.S.A.: 1 Tear $24.50, 2 Tears $42.50, 3 Tears $64-50 

* Foreign Surface: Add $12.00 per Year to USA Price. 

* Foreign Alraoll: Add $48.00 per Year to USA Price. 

* Canada & Mexico: Add $ 9.50 per Year 1o USA Price. 

* U.S. Currency Cash or Check Drawn on a USA HaM M 
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5900 Cassandra Smith fid. 

Hixson, TN 37343 



pEsai 



(615)842-4600 

Telex 5106006630 









Lloyd I/O iso computer engineering o&paolKn providing 
softwom ok) hadware products and consulting services 

19535 NEGUSAN • PORTIAND, OR 97230 (USA) 

PHONE: (503) 666-1097 - TEIEX 910 380 544* UOYD I O 

New Product! 

CRASMB " CROSS ASSEMBLER 
NOW AVAILABLE FOR OS9/68000 

LLOYD I/O announces the release of the 
CRASMB 8 Bit Macro Cross Assembler for 
Microware's OS9 disk operating system for 
the 68000 family of microprocessors. In recent 
increasing demand for the OS9/68000 version 
of CRASMB. LLOYD I/O has translated its four 
year old CRASMB for the OS9/6809 and FLEX/ 
6809 to the OS9/68000 environment. 

CRASMB supports assembly language soft- 
ware development for these microprocessors: 
1802. 6502. 6800, 6801. 6303, 6804. 6805, 
6809, 6811, TMS 7000, 8048/family. 8051/family, 
8080/85. Z8. and the Z80. CRASMB is a full 
featured assembler with macro and condi- 
tional assembly facilities. It generates object 
code using 4 different formats: none, FLEX, 
Motorola S1-S9, and Intel Hex. Another format 
is available which outputs the source code 
after macro expansion, etc CRASMB allows 
label (symbols) length to 30 characters and 
has label cross referencing options. 

CRASMB for OS9/68000 is available for $432 
in US funds only. It may be purchased with 
VISA/MASTERCHARGE cards, checks. US 
money orders, or US government (federal, 
state, etc.) purchase orders. NOTE: please 
add $5 shipping in the USA and use your 
street address for UPS shipments. Add $30 for 
all overseas orders. CRASMB for OS9/6809 
and FLEX/6809 cost $399 plus shipping. 

You may contact Frank Hoffman at LLOYD I/O, 
19535 NE Glisan, Portland, Oregon. 97230. 
Phone: (503) 666-1097, Telex: 910 380 5448. 
answer back: LLOYD I O. Easylink: 62846110. 
See list of distributors below. 



VISA. MC. COO. CHECKS. ACCEP1ED 
USA: UOYD UO 1 50 1 6441097). S.E. MEDIA (800 336 6100) 

England: Vlvawoy(0S«2 423429). Wlndi\J»h (0692 405189) 

Germany Zacher Computer (45 26 Z99|. Kell Software (06203 6741) 
Auirrolki: Parti Radio Electronic^ (344 9111 1 
Japan: Mleroboordl 10474) 22.1741 S»lkou(03)832 6000 

Swlfterland: Ebort AG (0S6 M 27 24) 
Sweden: Mtcromailer Scandinavian AG (014 -138595) 

KMSCOO.S&V>CMondf&XVEU7U7¥i 

R4ICX CR4»« and CS4SUS to 32 are taae^rm ot UOID *0 

0S9«o " at Mfcrowy* USX to a "at IX 
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OS-9™ SOFTWARE 

SDISK— Standard disk driver module allows the use of 
35. 40, or 80 track double sided drives with COCO OS 9 
plus you can read/write/format the OS-9 formats used by 
other OS-9 systems. $29.95 

SDISK + BOOTFIX— As above plus boot directly fiom a 
double sided diskette $35.95 

FILTER KIT #1— Eleven OS-9utilltles for "wild caid" dlrec- 
tory lists, copies, mows, deletes, soils. etc. Now Includes 
disk sector edit utility also. $29.95 ($31.95) 

FILTER KIT #2— Macgen command macro generator 
builds new commands by combining old ones with 
parameter substitution, 10 other utilities. $29.95 ($31.95) 

HACKER'S KIT #1— Disassembler and related utilities 
allow disassembly from memoiy, file. $24.95 ($26.95) 
PC-XFER UTILITIES —Utilities to read/write and format 
MS-DOS'" diskettes on CoCo under OS-9. Also transfer 
tiles between RS disk basic and OS-9. $45 (version now 
available for SSB level II systems, Inquire). 

CCRD 512K RAM DISK CARTRIDGE —Requires RS 
Multlpak interface: with software below creates OS-9 
RAM disk device. $259 

CCRDV OS-9 Driver software for above. $20 

BOLD prices are CoCo OS-9 format disk, other formats 
(In parenthesis) specify format and OS-9 level. All orders 
prepaid orCOD, VISA and MasterCa/d accepted. Add $1.50 
S&H on prepaid, COD actual charges added. 

SS-50C 

1 MEGABYTE RAM BOARD 

Full megabyte of ram with disable options to suit any 
SS-50 6809 system. High reliability, can replace static ram 
for a fraction of the cost, $699 for 2 Mhz or $799 for 2.25 
Mhz board assembled, tested and fully populated. 

2 MEGABYTE RAM DISK BOARD 
RD2 2 megabyte dedicated ram disk board for SS-50 
systems. Up to 8 boards may be used In one system. 
$1150; OS-9 drivers and test program, $30. 

(Add $6 shipping and insurance, quantity discounts 
available.) 

D.P. Johnson, 7655 S.W. Cedarcreit St. 

Portland, OR 97223 (503) 244-8152 

(For best service call between 9-11 AM Pacific Time) 

OS-9 It > uaoemarti ol MIciowW* and MoKxoK Ine 
MS-OOS It ■ U»rt«m»rti ol Mtcroaoll. Inc. 



COMPILER EVALUATION SERVICES 
By: Ion Anderson 

The S.E. MEDIA Division of Cospater 

Fabllshlbg lac . , 

Is offering the following SUBSCRIBER 

SERVICE: 



iuisoa 



IVALUATIC* tXTOtT 



Due CO Che conitint and rapid updating and 
enhanceaent of auaeroua coapllera, and the 
different utility, appeal, speed, level of 
coaaunlcat loo, aeaory ueage, etc., of different 
coapllera, the following aervlcea are now being 
offered with periodic updates. 

Thla aervlce, with updacea, will allow you who are 
wary or confuaed by the varloua clalas of compiler 
vendora, an opportunity to review coaparleont, 
coaaenta, benchaarka, etc., concerning Che aany 
different coapllera on the aarkec, for Che 6809 
alcrocoapucer. Thua che aavlnga could far offset 
Che aaall coac of thla service. 

Many have purchased coapllera and Chen discovered 
Chac Che particular coapller purchaaed either la 
not Che aoat efficient for Chelr purposes or does 
noc concaln feacurea neceasary for chelr 
application. Thua Che added expenae of 
purchasing additional coapller(e) or not being 
able to fully utilize che advantages of high level 
language coapllera becoaee coo expensive. 

The following COMPILERS are reviewed Initially, 
aore will be reviewed, coapared and benchaerked 
aa chey becoae available Co che author: 

PASCAL "C" GSPL WHIMSICAL PL/9 

Initial Subscription - $ 39.95 

(Includes 1 year updates) 
Updates for 1 year - $ 14.50 

S.E. MEDIA - C.P.I. 

5900 Cassandra Salth Rd. 

Hlxson, Tn. 37343 

(615) 842-4601 




68000 68020 68010 
68008 6809 6800 



Write or phone tor catalog. 

AAA Chicago Computer Center 

120 Chestnut Lane — Wheeling iL 60090 
(312)459-0450 



Technical Consultation available moil weekdays from 4 PM lo 8 PM CST 
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DRIVE ENCLOSURES 



«.<**■ FLOPPY-WINCHESTER-TAPE 

#V FROM *80 00 

(Includes Power Supply) 



»■ 







•Desktop & Rock 

• Heavy Duly All Metal Cabinet 

■ Fan & Dust Filter 

• Hetty Power Supplies 

• Full or Slim Drives 

■ Power Harness From Supply To 
Drives 

• Line Fuse, EMI Filter*, 
Detachable Line Cord 

• Cabinets & Supplies Available 
Separately 

* UoUMaOMI (Oik OlMH not included) 



IBII&;8IBI->: 



Wilte or coll lor our brochure which includes our opplicolion note 
'Making micros, better than anv ol' box computer" 



PtStARCH COftPOBAIION 
8620 Roowvelt Ave./ Vlsollo, CA 93291 
209/651-1203 

32 Page Free fokt Pokt Catalog 



OPl 

Fieyortd Pascal, C . and ADA® there is a better programming language: \J< I I— 

An easier, laaei method of dfrvaHong high quality prog rams is yours Some features Of OPL are 

with OPL This Is a language ot unmatched power and •onvenietwe . Exacl Arithmetic — no rounding or Vuncalion 

wfuch can stimulate your creative arjilmes Eilra wide range (10 exp • 32000) 

__ • Unlimned lengdi variable names and stnngs 

OPL ,s ve.y eMioen, w„hou. being t Br& e |,s EASY TO HEAD & WRiTE' . S|mp|e branch & |(xjp ^^ ^ nes)(ng mi 

A prog.am wntten in Pascal, C . Basic, or Cobal can usually be wm.en . powe , fu| s| ^ oo™^ alte.nal.on. 

,n about 70% FEWER LINES ,n OPL The powerful OPL compiler man- concatenation, patletn matching, and more 

ages tie dela.ls ol ptogramming allowing you to concenlrale on the . H(gh eHlc , ency )||e (otmading (aboul Mice 

problem lo be solved |he space enicBncy 0l p asca | antJ Baslc lllaS ) 

• Automatic variable suing, no l«ld overflows 
Many Applications , Name |, K]l , octlon (g, easy da i a ctiamng 

■ Business data processing ■ Conformant arrays hoW mined dala types 

• Convuier aided instruction games . Compatible wilh Pascal. Base . Cobot . Axs«n*»y 

• Eitpen systems arlifKaalirteloence • S»npie mnii and output methods & printer control 

• 1ei( processing . encooVig decoding • Fast, effioenl correlation 

• High preoaon math applications • Symbol* tracing lor last de-bug 

• Systems utility programs 

• Robotics Language brochure with example program FREE 

• Industrial microcomputer applies lions Demons Irabon dis* i mini manual $10 00 

Full 90 page personal or business manual 3?4 95 

No matter what type of programming you do, OPL has features designed Full manual (peis or bus I • demo disk & binder $34 95 

to speed up development and reduce mamlamance 

Personal System, runs under Flex $295 

Runs lull language, uses smaller disk space 
OPL is as easy 10 learn as BASIC, and more powerful than Pascal The 

clearly wntten 90 page manual has Over 30 complete example programs Business System, runs under Flex $695 

Faster operation. Iree run time licence 
The OPL compee r and run hine lorary <s written in assemble! language 

tor maximum speed and minimum space It incudes a linking loader to Free User's Group Membership with compiler purchase 

mnmwe the linal program sue 

Visa & Master Card welcome 

r MHL 

k. I a^lm. -4 Compiler Products Unlimited, Inc. 671? f Presidio. Scortsdale. AZ 6S2S4 (6071 991165? 
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Dlak-I Fllfsort, Mlnlcet, Mlnlcopy, Hlntfna, 

••Ltfetiiae, "Poetry, "Foodlist, »«Olet. 
Dlsk-Z Dlskedlt w/ lnat.4 rfs.es, Pr!»e. *Pr»od, 

**Snoopy, **FaotbAll, **llexpavn ,* *1.1 f St line 
Dlsk-3 CbiiRU 1 ). Seel. Sec2, Find, Tat>lc2. Intext, 

ulsk-exp, 'Dlsksave. 
Dlak-4 Mailing Frojini, "Flnddat, «Chan*e, 

*TeatdlaV. 
DlSR-5 *D1SKFIX I. «D1SKF1X 2, **LETTER. 

••LOVKSrCK, **BUCKJAIC. "IHWLINC. 
Dlak-6 "Purchase Order, Index (Disk file !ndx) 
01sk-7 Linking loader, Rload, llarhness 
Olak-B Crtest, Lanplier (May 62) 
DIak-9 Dntecopy, D<skHx9 (Aim HI) 
01sk-10 IIofw AccountlnR (July A2) 
Dlak-I 1 Dlaaeaiblcr {June 84) 
Olak-12 Ho4em6S (flay R») 
Dlsk-13 »lnlt»f6B, Test»f68, "Cleanup. »0nk»llRn, 

Help, Oate.Txt 
Dtsk-14 »lnlt, «Te»t. •Terminal. 'Find, •Dlekedlt, 

Inl C .1.1 r. 
Dlek-IS Mndeo9 ♦ Updates (U«k 64 Cllcnrlet) to 

Modcr-9 (April 84 Conao) 
Oiak-16 Copy.Txt. Copy. Itac, Cnt.Txt, Cat. IMC 
Dlak-17 M.ltcll Utility. 8ATBAS, A Basic (Yep roeeaaor 
Dlsk-18 Parne.HoH, Slze.Cbd (Sept. 85 ArnatronR), 

CMDCn!>£, CMD.T«t (Sept. R5 Spray) 
Dlsk-19 Clock, Date, Copy, Cat, PDEL.Aan 4 Hoc, 

trrorrt.Sya, Do, loR.Asn 4 Tine. 
Oljk-20 UNIX Like Toola (July 6 Sept. KS Taylor 4 

CUclirlat). IW'aron.C, Oren.C, IJJ.C. FOUNP.C 
Dlak-21 Utilities 4 Gaaiea - Date, Life, Madness. 

Toucii, Goblin, Starahot, a IS more. 
Dlak-22 Read CPM 4 Non-FLEK IKsxa. Fraaer May 

1 984. 
Dlak-23 ISAM, Indexed Sequential I I le Acceaalnx 

Hethnda, Condon Nov. 1985. Extendible Table 

Driven Language kecognltlon Utility, 

Anderson March 1984. 
Ulek-24 68' Micro Journal Index of Articles 4 Kit 

Butket Items from 1979 - I9AS, John Current. 
Dlak-25 KERMIT (or FLEX derived from the UNIX vet. 

Burn Feb. 1986. C2J-5" Disks or (])-«.- Disk. 
Dlak-26 CosiPSCta UnlBoord Review, Code 4 Dlseram. 

Burltnaon March 1986. 



This la a reader service OMLTI No Warranty Is 
offered or Implied, they are aa received by ~W 
Micro Journal, and are for reader convenience ONLY 
(some HAY Include f lxea or patches). Alao 6U00 and 
6809 programs are mixed, as each la fairly simple 
(mostly) to convert to the other. 



8" Disk $14.95 



5" Disk $12.85 



68' Micro Journal 

5900 Cassantta Smth Rd. Htxson, Tn. 37343 
(61 5) -842 4600 



•Indicates 6800 
•» Indicates BASIC SWTPC or TSC 
6otr3 to Indicate 
Foreign Orders Add S4.30 for Surface Mill 
or $7 00 for Air Mail 
• AD Qirency in U.S. Dollars 

Telex 5106006630 
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PT-69 SINGLE BOARD COMPUTER SYSTEMS 
NOW WITH WINCHESTER OR FLOPPY DISK DRIVES 

The proven PT-69 Single Board Computer line is expanding! Systems now can be Winchester or Ifoppy-based Available also in a smaller 
cabinet without drives tor dedicated systems with no mass storage requirements 



' 1 MHZ 6809E Processor 
■ Time-ol-Day Clock 




■ 2 HS 232 Serial Ports (6850) 

■ 56K RAM 2K/4K EPflOM 



Custom Design inquiries tVWcome 



2 8-bir Parallel Ports (6821) 
2797 Floppy Disk Controller 



WloclOTltr Sytl«TTi 

• PTt9KT WINCHtSHR STS1IM 
Includes S MIS Winchester Drive. Z 40 tract DS/DD Drives. 
Parallel Printer Inter I see • choice nl OS/9 or SIAR DOS 




• PI69S? riofpT STStrri 

Inclmtas PJb9 Board. ? 05/00 A0 IRK b 1/4' 
«» Itching poorer supply. OS/9 or STAR DOS 



1 1 1 OS 95 



189S 9S 



• PI oSAASSrnBIID & 

.05/9 

•SIAR 0OS 



ISltO BOARD 



I77SOO 
1 700 00 
S SO 00 



drives, toftin 



VISA MASrEHCARD/CHECK/COO 



PERIPHERAL TECHNOLOGY 

1480 Terrell Mill Rd . Suite 970 

Marietta. Georgia 30067 

Telex K680584 



404 984-074 2 



CAU Of* WHITE FOfl AGOTIOttAl 
COHF1GUHATION5 



V 

Vp to 3? groups/Plaldt nr 'tcgrl' Up ia i2 cktrMlff 'laid man' 
'--* to 1C2* byta rtcoidi 1 input .Proxaaa-Output ijpoi caawnand atftatlura* 
Vppor/Lowar caa« co*n»*f * •" Off d afina* a era an and pr In I control ■ 
P'QCaat filaa* Pof* Ulii* Condlllana] asacvlloa' Pfocaaa cri.mmgi 
Upi*f«/Oo.o-if«- nil lir-«Lnc fill |ei*laf' la/ido* Mlt ulttuaL t **»*■• ' 
■wilt I" utlLitiaa' BuiH l« un Una editor* Fully aaaaian firlanted 1 
■>MA(il form*' So Id fata. Dawtle •idtf, Utile* a*d Tliidariine tu*f-ari«d> 
Mnliah in compact atrutttfred oiie*m»ta lnta« r «t*a for F45T aiaculioa' 

XDMS-IV P-tm M>n«a«m«nt B^t.m 
IDMS-1V it • brand now approach la data Man a| e<ff.eA t . It not snip pumitt 
uttn In dd*CTll>>4 antar and r*lri*i** dirt, fcul alio to p'Otata antir* 
f i !•• producing cutto*»n td repot t a* ac '••« dleplay a *«d 'ill output. 

including reco'd and field aeloctian , aortlne ind apgraflatian. lookup* 
tn Other ft lot. a p octal procaaa.nf p.f rOCord aubaata. cultDA roperl 
formal Nna, totaling ond aubtot a .Infl . and #r aaan I.Don of up la thro* 

POWERFUL CQMWAMPB* 

lbKS-lV catnbtnoti the I wnctiontJl X j °# ***** popular CBK3 aertnar* *y«1et>* 
Kith a "•- •*»» to i.i* ccwmiria nr Into a tingle inVtfjPdtdd fiaehage. 
Ha'va mclutfad ■rMiy nit* feature* «.a# coa-Maida inclu-dinB a **t of general 

'►if utllltiaa. Ttin proctnlng cn*>*inli ate Input - Pf oceie -Outp ut llPQj 
onantad -hich *Jlo-a 4lm»it inataM l>**lea>erit*li on of a prorata daeign. 

BESSXQM QRIEHTED' 
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t'lla •ililorl. POdOt nd DIXIT! liftllitlnal. Olfvara ara proctii towMnii 

coaiatantf. tUMr *ay I* orttorad Inta a "j racaaa* ri )o ■> M en la niculir 
ajr an f IlCtfTf alalan>ani. Procaaaa* may oiacuta ell>«r procaam. at 

*ria«naalvaa> aittiar eondiU a n al I r ar wncond ill o* all y • Nmui and acraan 

•rlinaut ivi) inavinf IDHI-Iir" 

TT-& EABTT TO UHE' 

IDMS-IV liftDt diu rn*na v «inanr alwpla' Ralrwr lh*n d*«ign . Cflrmalai DlJKl 
vhieh hidat th« tfu# Aatuta a*" ma data, -a Mpt XDM1-I7 Ilia *riap>t«d. 
T Pi* vi*r viaw oF data r alanon t hipi L « praaafital In rapgrta and • 'it" 
aulautf -Mlt tit actual alata faaldaa it* a*a> Id maintain *■.■* Thia 
aapacl parmttp cjils«ni*d p »■ HH I a 1 1 a>n and 'ijcfi «ltt*aut caraalai 
radafiatitian of tria data»a«* flta* and otrwetuta* XDNi-tv May li ttaad 
far a »>«a ranp« a' appllcatlona *r«aa al*#l» rauard iwiJitim *v*ta*j>* 
taddraataa. In van lor » ,,,J to IMatratad datataaa ivittn* (ordar antry, 
accounting...!. Tni pcaalkll III a* ara usll«l tad... 

XDHI-tV far **»> PLtZ. fT*,H-[fUI. IffaEKM »" ar ■"> «3)0.«0*PtR 

Ordar by Phoaat HVMJ-tlOO/i.6! - (V1U «nd HiatvrCartf acc.piar- 
Or -rttal South Caat HaaHa. ??00 Caaiand'a ■■w.l.rt. bimod. Tann 3TJ«3 

WESTCHESTER Appllad Bualnaia Qyatama 

2 Paa Pond Lana. Briarclilf Masai. ».T. I0SI0 Tal • 1 *-» at -)332rx v aa I 

fl(JlU> Tacairal tvatam. EoWaallMl*. IfWHil IIW-KITI Car*. 
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ALL SYSTEMS INCLUDE: 

* The CLASSY CHASSIS with a ferro- resonant, constant vottege power 
supply that provides - 8 volts al 30 Amps. - 1 6 volts at 5 Amps, and 

- 16 volts al 5 Amps. 

* GoM pialed bus connectors. 

* Double density OMA floppy disk controllers. 

* Complete hardware and software documentation 

* Necessary cables, filler plates. 

YOU CAN EXPAND YOUR SYSTEM WITH: 

MASS STORAGE 

Dual 8" 0S00 Floppies. Cabinet & Power Supply $1698. 8B 

60MB Streamer (UniFIEX-020 only) $2400.00 

16MB Dual Speed Floppy (underdevelopment) 

MEMORY 

#67 Sialic RAM -64X NMOS (6809 Only) $349 67 

#64 Static RAM-64K CMOSw/batlery (6809 Only) $39B64 

#72 256K CMOS Sialic RAM w/balteiy $99B 72 

#31 16 Sockel PROM/ROM/RAM Board (6809 only) $268.31 

INTELLIGENT I/O PROCESSOR BOARDS 

significantly reduce systems overhead by handling routine I/O tune- 
lions; treeing the host CPU tor running user programs This improves 
overall system performance and allows user terminals to be run at up 
to t9.2K baud. For use with GMX III and 020 systems. 

#1l3PorlSerial-30Pin(0S9) $498.11 

#l4 3PortSerial-30Pin(UniFLEX) $498.14 

«12Pa/allel-50Pin(UniFLEX-020) $538.12 

#13 4 Pod Serial-50 Pin (0S9 & UniFLEX-020) $618.13 

I/O BOARDS (6809 SYSTEMS ONLY) 

#41 Serial. 1 Port $88 41 

#43 Serial. 2 Port $128.43 

#46 Serial, 8 Port (0S9/FLEX only) $318.46 

#42 Parallel, 2 Port $88.42 

#44 Parallel, 2 Port (Centronics pinout) $128.44 

#45 Parallel, 8 Port (0S9/ FLEX only) $198.45 

CABLES FOR I/O B0AR0S- SPECIFY BOARD 

#95 Cable sels(t needed per port) ..... $24.95 

#51 Ont B.P.Cablefor#12&#44 $34.51 

#S3Cenl CableSet $36.53 

OTHER BOARDS 

#66PrOtolyplngBoard-50Pin $56.66 

#33 Prototyping Board -30 Pin . $38.33 

Windrush EPROM Programmer S30 (0S9/FLEX 6809 only) $545.00 

CONTACT GIMIX FOR FURTHER DETAILS ON THESE AND 

OTHER BOARDS AND OPTIONS. 

EXPORT MODELS: ADO $30 FOR 50Hz, POWER SUPPLIES. 

ALL PRICES ARE FOB. CHICAGO. 

GIMIX OOES NOT GUARANTEE PERFORMANCE OF ANY GIMIX 
SYSTEMS. BOARDS OR SOFTWARE WHEN USED WITH OTHER 
MANUFACTURERS PROOUCT. 

GIMIX. Inc. reserves the right to change pricing, terms, and products 
specifications al any time without luriher notice. 



GIMIX 2MHZ 6809 SYSTEMS 



Operating 
Systems 

included 



CPU included 



Serial Pons 
Included 



High Speed 
Static RAM 



PRICES OF 
SYSTEMS WITH: 

Oual 80 Track 
DSDD Drives 



25MB Hard Oisk 
and one 80 (rack 
Floppy Oisk 



72 MB Hard Disk 
and one 80 track 



a 72MB * a 6MB 
removable pack 
hard disk and one 
80 Irack floppy 



a 72MB ♦ a 12MB 
removable pack 
hard disk arid one 
80 track (loppy 



GMX 6809 0S9/ 
FLEX SYSTEMS 
SOFTWARE 

0S9 ♦ Editor. 
Assembler . Debugger 



FLEX 



GMXBUG Monitor 



Basic 09. RunB (0S9) 



RMS (OSS) 



DO |059| 



VDisk tor FLEX 



RAM Disk for 0S9 



O-FLEX 



Support ROM 



Hardware CRC 



#49 

0S9 GMX 1/ 

and FLEX 



#05 



64KB 



$2998.49 



$5598.49 



$7598.49 



$909849 



N/A 



GMX I 
Included 



Included 



Included 



Included 



Included 



Included 



N/A 



N/A 



N/A 



N/A 



N/A 



#39 

OS9 GMX 11/ 

and FLEX 



#05 



256KB 



$3398.39 



$5998.39 



$7998.39 



$9498.30 



N/A 



GMX II 
Included 



Included 



Included 



Included 



Included 



Included 



Included 



$125 option 



$250 option 



N/A 



N/A 



#79 

OS9 GMX III/ 

and FLEX 



GMX 



3 Intelligent 



256KB 



$4898 79 



$7798.79 



$9798.79 



N/A 



$11,298 79 



GMX III 
Included 



included 



Included 



Included 



Included 



Included 



Included 



Included 



Included 



Included 



Included 



#39 

UnlFLEX 



#05 



256KB 



N/A 



$5998.39 



$7998.39 



$949839 



N/A 



#89 
UnlFLEX III 



GMX Ml 



3 Intelligent 



256KB 



N/A 



$8098.89 



$10.098 89 



N/A 



SH.59S.89 



GMX 68020 
SYSTEMS 



#020 
UniFLEX VM 



GMX 020 + MMU 



3 Intelligent 



1 Megabyte 



N/A 



$13 680 20 



$15,680 20 



N/A 



$17,180.20 



TO ORDER BY MAIL SEND CHECK OR MONEY ORDER OR USE YOUR VISA OR MASTER 
CHARGE Please allow 3 weeks lor personal checks to clear U S orders add $5 handl- 
ing if order is under S?Q0 00 Foreign orders add Sit) handling H order it under 
$200 00 Foreign orders over $200 00 will De snipped via Emery Air Freight COLLECT. 
and we will charge no handling All orders itust tie prepaid m j S tunes (lease not! 
thai foreign checks have been tailing about 8 weeks lor collection so we would advise 
wiring money, or checks drawn on a bank jeeount in the U S Our tun. Is the Coed den- 
ial minors National Sink ot Chicago 131 S uSaiie Street Chicago IL MH3. account 
number 73 32033 

BASIC -09 and OS 9 are trademarks of Mcrowart Systems Carp and MOTOROLA. Ine 
FLEX and IMFLEX art trademarks ol Technical Systems Consultants, ire G MIX 
GHOST GMX CLASSY CHASSIS, are trademarks of GIMIX. Inc 



inc. 



Available: Wide variety ot languages and other software 
lor use with either OS-9 or FLEX 

All GIMIX versions ol 0S9 can read and write RS eolor 
computer format 0S9 disks, as well as the 
Microware/GIMIX standard formal. 
Alt 0S9/FLEX systems allow you lo software select either 
operating system. 



Gimix 

1337 WEST 37th PLACE 

CHICAGO, ILLINOIS 60609 

(312) 927-5510 . TWX 910-221 -4055 




cues 6>ui» «c ties 



I y 




Now Offering: "FLEX" (2 Versions) 
AND "STAR-DOS PLUS+ " 




For Ordering Call 

(615)842-4600 



FROM - DATA-COMP, C.P.I 



A Family of 100% 68XX Support Facilities 

The Folks who FIRST Put FLEX" on 

The CoCo 






*?; 






STAR DOS PLUS + 

• Functions Same as FLEX 

• Reads • wiites FLEX Disks 

• Run FLEX Programs 

• Just type: Run "STAR-DOS" 

• Over 300 utilities & programs 
to choose from, 











TSC Editor 

RteSSOOO 

NOW $35.00 


! 


L 




1 



PLUS 




ALL VERSIONS OF FLEX 

+ Read Wiite-Dir RS Disk 
+ Run RS Basic from Both 
+ More Free Utlities 



& STAR-DOS* INCLUDE 

+ External Tenninal Program 
+ Test Disk Program 
+ Disk Examine & Repair Program 
+ Memoiy Examine Program 
+ Many Many More!!! 



TSC Assembler 

KesWOOO 
NOW $35.00 



CoCa Disk Drive Sgstenis 



2 THINLINt DOUBLE SIDED DOUBLE DENSITY DISK DKIVfcS 
SYSTEM WITH POWER SIIPPLY.CAR 1NKT, DISK DRIVE CABLE, JiH 
HEW DISK CONTROLLER JF0-CP WITH J-0OS, BS -DOS 0PEXATINC 
SYSTEMS. »4»?.fS 

• Specify What CONTROLLER You Vast J**, or IAD IO SHACK 



THINLINE DOUBLE SIDED 
DOUBLE DENSITY 40 TRACKS 



Verbatim Diskettes 



Static Sided Double Denalty 
Double Sided Double Denalty 



Cuuli ill lei s 



JiH jpd-cp with J-eoS 

WITH J-D0S, US-DOS 
RADIO SHACK 1.1 

RADIO SHACK Dlak CONTROLLER I. I 



Disk Drive Cables 



Cable (or One Drive 
Cable for Two Drive* 



BI2f.fi 



* 2* .00 
S 24.00 



51)1,15 
SIS9.fi 
lOA.ti 

51J4.95 



$ lf.fi 
S 24. fS 



44K VPCRADE 

FOR CD.E.F, AND COCO ll 
RADIO SHACK BASIC I. 2 
RADIO SHACK DISK BASIC I.I 

DISK DRIVE CABINET FOR A 
S1NCLE DRIVE 

DISK DRIVE CABINET POR TWO 
THINLINE DRIVES 



nvraf 

EPSON I.X-80 
EPSON MX- 70 
EPSON MX- I 00 



BUB 2K SERIAL BOARD 
B149 J2X EXPAND TD I28X 
EPSON NX-KK-80 KIBRONS 
EPSON LX-80 RIBBONS 
TRACTtR UNITS POR LX-BU 
CABLES 4 OTHER INTEVJFACRS 
CALL POR PRIClHi; 



$ 2f.fi 



* 24. « 

i 24.fi 



« 4f.fi 
« 4f.fi 



»2»f.f5 

BUi.fi 

•4fi.fi 



t Bf.fi 

»i6f.f; 

} 7.« 
* i.fi 
» If.fi 



DATA-COMP 

5900 Cassandra Smith Rd 
Hixson. TN 37343 




» 




SHIPPING BuB 

.<^:« d a d .I! ,> s«| (615)842-4600 

tllH. $2. SO For CfrikHifva 

Telex 5106006630 




" 






S-50 bus/68XX 

Board and/or Computer 

Terminal •-CRTs-Printers 

Disk Drives-etc. 

REPAIRS 



MM AVAILABLE TO ALL S50/MXX USERS 

The Oete-Comp Division ot CPI Is proud to announce the availability 
ot their service department facilities to 'ALL' S50 6us and 68XX 
users. Including all brands, SMTPC - GlHix - SSB - HELIX and 
others, Includ Ing the single board computers. "Please note that 
kit-built components are a special case, and will be handled on an 
Individual basis. If accepted. 

1. If you require service, the first thing you naad to do Is call 
the number below and describe your problem and confirm a Oota-Ooep 
service 1 shipping number I This Is very Important, Data-Comp will 
not accept or repair Items not d I splaying this number! Also we 
cannot advise or help you troubleshoot on the telephone, we can 
give you a shipping number, but NO advice) Sorryl 

2. All service shipments must Include both a minimum $40.00 
estimate/repair charge and pre-paid return shipping charges 
(should ba same amount you pay to ship to Data-Comp). 

3. If you desire a telephone estimate after your repair Item Is 
received. Include an additional 15,00 to cover long distance 
charges. Otherwise an estimate will be mailed to you. It you 
requested an estimate. Estimates Must be requested. Hailed 
estimates slow down the process considerably. However, If repairs 
are not desired, after the estimate Is given, the 140,00 shall 
constitute the estimate charge, and the ltem(s) will be returned 
unrepaired providing sufficient return shipping charges were 
Included with Item to be serviced. Please note that estimates are 
given In dollar amounts only. 

4. Data-Camp service Is the oldest and most experienced general 
S30/66XX service department In the world. Me have over 
1100,000.00 In parts In stock. Me have the most complete set of 
service documents for the various S50/68XX systems of anyone - 
YET. ME DO NOT HAVE EVERYTHING! But we sure have more than anyone 
else. Me repair about 90$ of all Items we receive. Call tor 
additional Information or shipping Instructions. 
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DATA-COMP 

5900 Cassandra Smith Rd 
Hixson. TN 37343 



(615)842-4607 

Telex 5106006630 




